GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-20 00:22:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

ParseFin ProDrop variants ; ParseFre question word order and pronoun gender variants

Browse Source
This commit is contained in:
aarne
2013-12-17 09:54:11 +00:00
parent 120e616a28
commit 599027ff18
9 changed files with 72 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
lib/src/finnish/ResFin.gf
View File

@@ -72,7 +72,7 @@ oper
-- have a uniform, special accusative form ("minut", etc).
param
NPForm = NPCase Case | NPAcc ;
NPForm = NPCase Case | NPAcc | NPSep ; -- NPSep is NP used alone, e.g. in an Utt. Equals NPCase Nom except for pro-drop
oper
npform2case : Number -> NPForm -> Case = \n,f ->
@@ -81,7 +81,8 @@ oper
case <<f,n> : NPForm * Number> of {
<NPCase c,_> => c ;
<NPAcc,Sg> => Gen ;-- appCompl does the job
<NPAcc,Pl> => Nom
<NPAcc,Pl> => Nom ;
<NPSep,_> => Nom
} ;
n2nform : NForm -> NForm = \nf -> case nf of {
@@ -518,7 +519,7 @@ oper
nsa = possSuffixFront agr
in {
s = table {
NPCase Nom => itse ! NPossNom Sg ;
NPCase Nom | NPSep => itse ! NPossNom Sg ;
NPCase Gen | NPAcc => itse ! NPossNom Sg + nsa ;
NPCase Transl => itse ! NPossTransl Sg + nsa ;
NPCase Illat => itse ! NPossIllat Sg + nsa ;