msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

work on Finnish

Browse Source
This commit is contained in:
aarne
2005-06-30 07:35:01 +00:00
parent 6b83de3263
commit 5c5dd161d0
7 changed files with 203 additions and 76 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
lib/resource/finnish/SyntaxFin.gf
View File

@@ -221,10 +221,17 @@ oper
\isDef,n,mies ->
case n.isNum of {
True => {
s = table {
NPCase Nom => n.s ! NPCase Nom ++ mies.s ! False ! Sg ! Part ;
c => n.s ! c ++ mies.s ! False ! Sg ! npForm2Case Sg c
s = case n.n of {
Sg => table {
NPCase Nom => n.s ! NPCase Nom ++ mies.s ! False ! Sg ! Nom ;
c => n.s ! c ++ mies.s ! False ! Sg ! npForm2Case Sg c
} ;
_ => table {
NPAccGen => n.s ! NPCase Nom ++ mies.s ! False ! Sg ! Part ;
NPCase Nom => n.s ! NPCase Nom ++ mies.s ! False ! Sg ! Part ;
c => n.s ! c ++ mies.s ! False ! Sg ! npForm2Case Sg c
}
} ;
n = if_then_else Number isDef Pl Sg ;
p = NP3
} ;