1
0
forked from GitHub/gf-core

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

This commit is contained in:
aarne
2008-08-19 07:56:21 +00:00
parent 6d0cdf3cda
commit 1510e08209

View File

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