From 1510e082096e152b38713e287ac5e87dbf382346 Mon Sep 17 00:00:00 2001
From: aarne <aarne@cs.chalmers.se>
Date: Tue, 19 Aug 2008 07:56:21 +0000
Subject: [PATCH] qualified a pattern in Constructors, preventing it to be
 taken as a variable

---
 lib/resource/api/Constructors.gf | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/resource/api/Constructors.gf b/lib/resource/api/Constructors.gf
index 02d8e9bc6..b08a63eed 100644
--- a/lib/resource/api/Constructors.gf
+++ b/lib/resource/api/Constructors.gf
@@ -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)
              } ;