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

correction in Scand definiteness with Ord

Browse Source
This commit is contained in:
aarne
2010-05-15 17:10:41 +00:00
parent 2839944f03
commit 3f8930f115
1 changed files with 4 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
lib/src/scandinavian/NounScand.gf
View File

@@ -51,7 +51,10 @@ incomplete concrete NounScand of Noun =
sp = \\b,g => quant.s ! num.n ! b ! True ! g ++ sp = \\b,g => quant.s ! num.n ! b ! True ! g ++
num.s ! g ++ ord.s ; num.s ! g ++ ord.s ;
n = num.n ; n = num.n ;
det = DDef detDef ---- quant.det det = case quant.det of {
DDef Def => DDef detDef ;
d => d
}
} ; } ;
DetQuant quant num = DetQuant quant num =