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

fix the syntax convention in DetArtOrd

Browse Source
This commit is contained in:
krasimir
2008-06-14 07:01:32 +00:00
parent 2874f5c096
commit 252f79ae96
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
resource-1.4/bulgarian/NounBul.gf
View File

@@ -90,7 +90,7 @@ concrete NounBul of Noun = CatBul ** open ResBul, Prelude in {
spec=Indef spec=Indef
} ; } ;
DetArtOrd = \art, num, ord -> { DetArtOrd art num ord = {
s = \\g,c => art.s ++ s = \\g,c => art.s ++
num.s ! dgenderSpecies g art.spec c ++ num.s ! dgenderSpecies g art.spec c ++
ord.s ! aform (gennum g num.n) (case num.nonEmpty of {False => art.spec; _ => Indef}) c ; ord.s ! aform (gennum g num.n) (case num.nonEmpty of {False => art.spec; _ => Indef}) c ;