ghc/compiler/simplCore/FloatIn.hi

   1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
   2 interface FloatIn where
   3 import BasicLit(BasicLit)
   4 import CoreSyn(CoreAtom, CoreBinding, CoreCaseAlternatives, CoreExpr)
   5 import CostCentre(CostCentre)
   6 import Id(Id)
   7 import PlainCore(PlainCoreExpr(..), PlainCoreProgram(..))
   8 import PrimOps(PrimOp)
   9 import TyVar(TyVar)
  10 import UniType(UniType)
  11 data CoreBinding a b
  12 data CoreExpr a b
  13 data Id
  14 type PlainCoreExpr = CoreExpr Id Id
  15 type PlainCoreProgram = [CoreBinding Id Id]
  16 floatInwards :: [CoreBinding Id Id] -> [CoreBinding Id Id]
  17