[project @ 1996-12-19 09:10:02 by simonpj]

[ghc-hetmet.git] / ghc / compiler / reader / PrefixSyn.lhs

diff --git a/ghc/compiler/reader/PrefixSyn.lhs b/ghc/compiler/reader/PrefixSyn.lhs
index cd4d1b8..fdf9b11 100644 (file)
--- 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...