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 = kukaInt : MorphoFin.Number => (MorphoFin.Case) => Str =
let { let
ku = mkN "kuka" "keitä" ; ----- kuka = mkN "kuka" "kenen" "kenä" "ketä" "keneen"
ket = mkN "kuka" "keitä"} in "keiden" "keitä" "keinä" "keissä" "keihin" ;
in
table { table {
Sg => table { Sg => table {
Nom => "kuka" ; c => kuka.s ! NCase Sg c
Part => "ketä" ;
Illat => "keneen" ;
c => ku.s ! NCase Sg c
} ; } ;
Pl => table { Pl => table {
Nom => "ketkä" ; Nom => "ketkä" ;
Illat => "keihin" ; c => kuka.s ! NCase Pl c
c => ket.s ! NCase Pl c
} }
} ; } ;
mikaanPron : MorphoFin.Number => (MorphoFin.Case) => Str = \\n,c => mikaanPron : MorphoFin.Number => (MorphoFin.Case) => Str = \\n,c =>