[project @ 1996-01-11 14:06:51 by partain]
[ghc-hetmet.git] / ghc / compiler / codeGen / CgClosure.hi
1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
2 interface CgClosure where
3 import AbsCSyn(AbstractC)
4 import CgBindery(CgIdInfo)
5 import CgMonad(CgInfoDownwards, CgState, CompilationInfo, EndOfBlockInfo, StubFlag)
6 import ClosureInfo(LambdaFormInfo)
7 import CmdLineOpts(GlobalSwitch)
8 import CostCentre(CostCentre)
9 import HeapOffs(HeapOffset)
10 import Id(Id)
11 import Maybes(Labda)
12 import PreludePS(_PackedString)
13 import PrimOps(PrimOp)
14 import StgSyn(StgAtom, StgBinderInfo, StgBinding, StgCaseAlternatives, StgExpr, UpdateFlag)
15 import UniType(UniType)
16 import UniqFM(UniqFM)
17 import Unique(Unique)
18 data CgIdInfo 
19 data CgInfoDownwards 
20 data CgState 
21 data CompilationInfo 
22 data HeapOffset 
23 data Id 
24 data Labda a 
25 data StgExpr a b 
26 data UpdateFlag 
27 cgRhsClosure :: Id -> CostCentre -> StgBinderInfo -> [Id] -> [Id] -> StgExpr Id Id -> LambdaFormInfo -> CgInfoDownwards -> CgState -> ((Id, CgIdInfo), CgState)
28 cgTopRhsClosure :: Id -> CostCentre -> StgBinderInfo -> [Id] -> StgExpr Id Id -> LambdaFormInfo -> CgInfoDownwards -> CgState -> ((Id, CgIdInfo), CgState)
29