26619fc92efff93dc7fd41a4c44d1476cad0719b
[ghc-hetmet.git] / ghc / compiler / coreSyn / CoreUnfold.hi
1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
2 interface CoreUnfold where
3 import Class(Class)
4 import CoreSyn(CoreExpr)
5 import Id(Id)
6 import Pretty(PrettyRep)
7 import SimplEnv(UnfoldingGuidance)
8 import TyCon(TyCon)
9 calcUnfoldingGuidance :: Bool -> Int -> CoreExpr Id Id -> UnfoldingGuidance
10 mentionedInUnfolding :: (a -> Id) -> CoreExpr a Id -> ([Id], [TyCon], [Class], Bool)
11 pprCoreUnfolding :: CoreExpr Id Id -> Int -> Bool -> PrettyRep
12