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

qualified a pattern in Constructors, preventing it to be taken as a variable

Browse Source
This commit is contained in:
aarne
2008-08-19 07:56:21 +00:00
parent 6d0cdf3cda
commit 1510e08209
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lib/resource/api/Constructors.gf
View File

@@ -971,12 +971,12 @@ incomplete resource Constructors = open Grammar in {
= DetArtSg ; = DetArtSg ;
mkNP : Art -> Num -> CN -> NP -- the old men --n14 mkNP : Art -> Num -> CN -> NP -- the old men --n14
= \d,nu,cn -> case nu.n of { = \d,nu,cn -> case nu.n of {
Sg => DetArtSg d cn ; ParamX.Sg => DetArtSg d cn ;
Pl => DetArtPl d cn Pl => DetArtPl d cn
} ; } ;
mkNP : Art -> Num -> N -> NP -- the men --n14 mkNP : Art -> Num -> N -> NP -- the men --n14
= \d,nu,cn -> case nu.n of { = \d,nu,cn -> case nu.n of {
Sg => DetArtSg d (UseN cn) ; ParamX.Sg => DetArtSg d (UseN cn) ;
Pl => DetArtPl d (UseN cn) Pl => DetArtPl d (UseN cn)
} ; } ;