0da1a6fb75337ac42a18bf43cdbeca12291b94e8
[ghc-hetmet.git] / ghc / compiler / codeGen / CgLetNoEscape.hi
1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
2 interface CgLetNoEscape where
3 import CgBindery(CgIdInfo)
4 import CgMonad(CgInfoDownwards, CgState, EndOfBlockInfo)
5 import CostCentre(CostCentre)
6 import Id(Id)
7 import Maybes(Labda)
8 import StgSyn(StgBinderInfo, StgExpr)
9 import UniqFM(UniqFM)
10 cgLetNoEscapeClosure :: Id -> CostCentre -> StgBinderInfo -> UniqFM Id -> EndOfBlockInfo -> Labda Int -> [Id] -> StgExpr Id Id -> CgInfoDownwards -> CgState -> ((Id, CgIdInfo), CgState)
11