From 4bc60a056d22e14f0075746560f96a05eb4d8d84 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

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

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