1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
2 interface CoreLint where
3 import CmdLineOpts(GlobalSwitch)
4 import CoreSyn(CoreBinding, CoreExpr)
6 import PlainCore(PlainCoreBinding(..))
7 import Pretty(PprStyle)
11 type PlainCoreBinding = CoreBinding Id Id
13 lintCoreBindings :: PprStyle -> [Char] -> Bool -> [CoreBinding Id Id] -> [CoreBinding Id Id]
14 lintUnfolding :: SrcLoc -> CoreExpr Id Id -> CoreExpr Id Id