1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
2 interface CgTailCall where
3 import AbsCSyn(AbstractC, CAddrMode, CExprMacro, MagicId, RegRelative)
4 import BasicLit(BasicLit)
5 import CLabelInfo(CLabel)
6 import CgBindery(CgIdInfo)
7 import CgMonad(CgInfoDownwards, CgState, CompilationInfo, EndOfBlockInfo, Sequel, StubFlag)
8 import ClosureInfo(LambdaFormInfo)
9 import CostCentre(CostCentre)
10 import HeapOffs(HeapOffset)
13 import PreludePS(_PackedString)
14 import PrimKind(PrimKind)
15 import StgSyn(StgAtom)
27 cgTailCall :: StgAtom Id -> [StgAtom Id] -> UniqFM Id -> CgInfoDownwards -> CgState -> CgState
28 mkDynamicAlgReturnCode :: TyCon -> CAddrMode -> Sequel -> CgInfoDownwards -> CgState -> CgState
29 mkPrimReturnCode :: Sequel -> CgInfoDownwards -> CgState -> CgState
30 mkStaticAlgReturnCode :: Id -> Labda CLabel -> Sequel -> CgInfoDownwards -> CgState -> CgState
31 performReturn :: AbstractC -> (Sequel -> CgInfoDownwards -> CgState -> CgState) -> UniqFM Id -> CgInfoDownwards -> CgState -> CgState
32 tailCallBusiness :: Id -> CAddrMode -> LambdaFormInfo -> [CAddrMode] -> UniqFM Id -> AbstractC -> CgInfoDownwards -> CgState -> CgState