[project @ 1996-04-25 13:02:32 by partain]
[ghc-hetmet.git] / ghc / compiler / reader / RdrHsSyn.lhs
index 29f69cb..e884ce0 100644 (file)
@@ -11,6 +11,7 @@ they are used somewhat later on in the compiler...)
 
 module RdrHsSyn (
        RdrNameArithSeqInfo(..),
+       RdrNameBangType(..),
        RdrNameBind(..),
        RdrNameClassDecl(..),
        RdrNameClassOpSig(..),
@@ -52,11 +53,12 @@ module RdrHsSyn (
 import Ubiq
 
 import HsSyn
-import Outputable      ( ExportFlag(..) )
+import Name            ( ExportFlag(..) )
 \end{code}
 
 \begin{code}
 type RdrNameArithSeqInfo       = ArithSeqInfo          Fake Fake RdrName RdrNamePat
+type RdrNameBangType           = BangType              RdrName
 type RdrNameBind               = Bind                  Fake Fake RdrName RdrNamePat
 type RdrNameClassDecl          = ClassDecl             Fake Fake RdrName RdrNamePat
 type RdrNameClassOpSig         = Sig                   RdrName