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

The possesive pronouns are changed to be definite by default. added indefinite possesive and reflexive pronouns in extra

Browse Source
This commit is contained in:
krasimir
2008-02-27 08:42:43 +00:00
parent 775c4cc34e
commit 31a6a99810
6 changed files with 55 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

42
lib/resource/bulgarian/ExtraBul.gf
View File

@@ -2,10 +2,21 @@ concrete ExtraBul of ExtraBulAbs = CatBul **
open ResBul, Coordination, Prelude in {
lin
GenNP np = {s = \\gn => np.s ! Gen (aform gn Def Nom); spec=Indef} ;
GenNPIndef np = {s = \\gn => np.s ! Gen (aform gn Indef Nom); spec=Indef} ;
PossIndefPron p = {
s = \\aform => p.gen ! (indefAForm ! aform) ;
spec = Indef
} ;
ReflQuant = {
s = \\aform => reflPron ! aform ;
spec = Indef
} ;
ReflIndefQuant = {
s = \\aform => reflPron ! (indefAForm ! aform) ;
spec = Indef
} ;
i8fem_Pron = mkPron "àç" "ìåí" "ìè" "ìîé" "ìîÿ" "ìîÿò" "ìîÿ" "ìîÿòà" "ìîå" "ìîåòî" "ìîè" "ìîèòå" (GSg Fem) P1 ;
i8neut_Pron = mkPron "àç" "ìåí" "ìè" "ìîé" "ìîÿ" "ìîÿò" "ìîÿ" "ìîÿòà" "ìîå" "ìîåòî" "ìîè" "ìîèòå" (GSg Neut) P1 ;
@@ -26,9 +37,30 @@ concrete ExtraBul of ExtraBulAbs = CatBul **
DMascDef | DMascDefNom | DMascPersonalDef | DMascPersonalDefNom | DFemDef | DNeutDef => "åäíèòå"
} ;
n = Pl;
empty = False
nonEmpty = True
} ;
UttImpSg8fem pol imp = {s = pol.s ++ imp.s ! pol.p ! GSg Fem} ;
UttImpSg8neut pol imp = {s = pol.s ++ imp.s ! pol.p ! GSg Fem} ;
oper
reflPron : AForm => Str =
table {
ASg Masc Indef => "ñâîé" ;
ASg Masc Def => "ñâîÿ" ;
ASgMascDefNom => "ñâîÿò" ;
ASg Fem Indef => "ñâîÿ" ;
ASg Fem Def => "ñâîÿòà" ;
ASg Neut Indef => "ñâîå" ;
ASg Neut Def => "ñâîåòî" ;
APl Indef => "ñâîè" ;
APl Def => "ñâîèòå"
} ;
indefAForm : AForm => AForm =
table {
ASg g _ => ASg g Indef ;
ASgMascDefNom => ASg Masc Indef ;
APl _ => APl Indef
} ;
}