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

finnish who_IP corrected; previous patch was to complete 1.4 for Finnish

Browse Source
This commit is contained in:
aarne
2008-06-04 13:51:39 +00:00
parent 742a7feeea
commit b33b7aa339
1 changed files with 6 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
lib/resource-1.4/finnish/StructuralFin.gf
View File

@@ -210,20 +210,17 @@ oper
} ;
kukaInt : MorphoFin.Number => (MorphoFin.Case) => Str =
let {
ku = mkN "kuka" "keitä" ; -----
ket = mkN "kuka" "keitä"} in
let
kuka = mkN "kuka" "kenen" "kenä" "ketä" "keneen"
"keiden" "keitä" "keinä" "keissä" "keihin" ;
in
table {
Sg => table {
Nom => "kuka" ;
Part => "ketä" ;
Illat => "keneen" ;
c => ku.s ! NCase Sg c
c => kuka.s ! NCase Sg c
} ;
Pl => table {
Nom => "ketkä" ;
Illat => "keihin" ;
c => ket.s ! NCase Pl c
c => kuka.s ! NCase Pl c
}
} ;
mikaanPron : MorphoFin.Number => (MorphoFin.Case) => Str = \\n,c =>