[project @ 1996-02-06 14:32:22 by dnt]
[ghc-hetmet.git] / ghc / compiler / main / MkIface.hi
1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
2 interface MkIface where
3 import Bag(Bag)
4 import CE(CE(..))
5 import CharSeq(CSeq)
6 import Class(Class)
7 import CmdLineOpts(GlobalSwitch)
8 import FiniteMap(FiniteMap)
9 import HsBinds(MonoBinds, Sig)
10 import HsDecls(FixityDecl)
11 import HsPat(InPat)
12 import Id(Id)
13 import Maybes(Labda)
14 import Name(Name)
15 import NameTypes(FullName, ShortName)
16 import PreludePS(_PackedString)
17 import Pretty(Delay, PrettyRep)
18 import SimplEnv(UnfoldingDetails)
19 import SrcLoc(SrcLoc)
20 import StgSyn(StgBinding, StgRhs)
21 import TCE(TCE(..))
22 import TcInstDcls(InstInfo)
23 import TyCon(TyCon)
24 import TyVar(TyVarTemplate)
25 import UniType(UniType)
26 import UniqFM(UniqFM)
27 import Unique(Unique)
28 data Bag a 
29 type CE = UniqFM Class
30 data GlobalSwitch 
31 data FixityDecl a 
32 data Id 
33 data Name 
34 data PrettyRep 
35 data StgBinding a b 
36 type TCE = UniqFM TyCon
37 data InstInfo 
38 data UniqFM a 
39 mkInterface :: (GlobalSwitch -> Bool) -> _PackedString -> (_PackedString -> Bool, _PackedString -> Bool) -> UniqFM UnfoldingDetails -> FiniteMap TyCon [(Bool, [Labda UniType])] -> ([FixityDecl Name], [Id], UniqFM Class, UniqFM TyCon, Bag InstInfo) -> [StgBinding Id Id] -> Int -> Bool -> PrettyRep
40