X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Fparser%2Fconstr.ugn;h=65b5b6723340895d714004c2b2976e6e20a16593;hb=dcef38bab91d45b56f7cf3ceeec96303d93728bb;hp=30cd4381212c837e16c648721d582ffb0f9ee8a3;hpb=f1815aa4bb218b92bc699d1355b6a704ee3e89ee;p=ghc-hetmet.git

diff --git a/ghc/compiler/parser/constr.ugn b/ghc/compiler/parser/constr.ugn
index 30cd438..65b5b67 100644
--- a/ghc/compiler/parser/constr.ugn
+++ b/ghc/compiler/parser/constr.ugn
@@ -35,6 +35,10 @@ type constr;
 			gconnty	    : ttype;
 			gconnline   : long; >;
 
+	/* constr with a prefixed context C => ... */
+	constrcxt   : < gconcxt	    : list;
+			gconcon	    : constr; >;
+			
 	field	    : < gfieldn	    : list;
 			gfieldt	    : ttype; >;
 end;