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

Turkish: bugfix in mkPron

Browse Source
This commit is contained in:
krasimir
2009-05-08 08:20:38 +00:00
parent 01b155f445
commit ce8c2bab75
1 changed files with 6 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
next-lib/src/turkish/ResTur.gf
View File

@@ -50,16 +50,18 @@ resource ResTur = ParamX ** open Prelude, Predef in {
ten => twenty
}
} ;
mkPron : (ben,beni,bana,banin,bende,benden:Str) -> Number -> Person -> Pron =
\ben,beni,bana,benim,bende,benden,n,p -> {
mkPron : (ben,beni,bana,banin,bende,benden,benli,bensiz:Str) -> Number -> Person -> Pron =
\ben,beni,bana,benim,bende,benden,benli,bensiz,n,p -> {
s = table {
Nom => ben ;
Acc => beni ;
Dat => bana ;
Gen => benim ;
Loc => bende ;
Abl => benden
Ablat => benden ;
Abess Pos => benli ;
Abess Neg => bensiz
} ;
a = {n=n; p=p} ;
} ;