X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Freader%2FPrefixSyn.lhs;h=fdf9b11fab86b0a31c79b32cc606c557c042f87b;hb=7a3bd641457666e10d0a47be9f22762e03defbf0;hp=cd4d1b8b938cd9fd6f6915327ad4b8626bb10c85;hpb=f65044d135ef61bee82a6c9767235f6780bdf00e;p=ghc-hetmet.git

diff --git a/ghc/compiler/reader/PrefixSyn.lhs b/ghc/compiler/reader/PrefixSyn.lhs
index cd4d1b8..fdf9b11 100644
--- a/ghc/compiler/reader/PrefixSyn.lhs
+++ b/ghc/compiler/reader/PrefixSyn.lhs
@@ -55,7 +55,7 @@ data RdrBinding
 			-- tell if its a Sig or a ClassOpSig,
 			-- so we just save the pieces:
   | RdrTySig		[RdrName]	    -- vars getting sigs
-			RdrNamePolyType     -- the type
+			RdrNameHsType     -- the type
 			SrcLoc
 
   -- user pragmas come in in a Sig-ish way/form...