[project @ 2005-11-30 14:20:06 by simonpj]

[ghc-hetmet.git] / ghc / compiler / hsSyn / HsSyn.lhs

diff --git a/ghc/compiler/hsSyn/HsSyn.lhs b/ghc/compiler/hsSyn/HsSyn.lhs
index 2fc0323..a9982a6 100644 (file)
--- a/ghc/compiler/hsSyn/HsSyn.lhs
+++ b/ghc/compiler/hsSyn/HsSyn.lhs
@@ -17,13 +17,9 @@ module HsSyn (
        module HsPat,
        module HsTypes,
        module HsUtils,
-       Fixity, NewOrData, 
+       Fixity,
 
-       HsModule(..), HsExtCore(..),
-       collectStmtsBinders, collectStmtBinders, collectLStmtBinders,
-       collectGroupBinders, collectHsBindLocatedBinders,
-       collectHsBindBinders,
-       collectSigTysFromHsBind, collectSigTysFromHsBinds
+       HsModule(..), HsExtCore(..)
      ) where
 
 #include "HsVersions.h"
@@ -37,15 +33,14 @@ import HsLit
 import HsPat
 import HsTypes
 import HscTypes                ( DeprecTxt )
-import BasicTypes      ( Fixity, NewOrData )
+import BasicTypes      ( Fixity )
 import HsUtils
 
 -- others:
 import IfaceSyn                ( IfaceBinding )
 import Outputable
-import SrcLoc          ( Located(..), unLoc, noLoc )
+import SrcLoc          ( Located(..) )
 import Module          ( Module )
-import Bag             ( Bag, foldrBag )
 \end{code}
 
 All we actually declare here is the top-level structure for a module.
@@ -61,7 +56,7 @@ data HsModule name
                                -- imported interfaces early on, adding that
                                -- info to TyDecls/etc; so this list is
                                -- often empty, downstream.
-       [LHsDecl name]  -- Type, class, value, and interface signature decls
+       [LHsDecl name]          -- Type, class, value, and interface signature decls
        (Maybe DeprecTxt)       -- reason/explanation for deprecation of this module
 
 data HsExtCore name    -- Read from Foo.hcr