ghc/compiler/deforest/DefExpr.hi

   1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
   2 interface DefExpr where
   3 import CmdLineOpts(SwitchResult)
   4 import CoreSyn(CoreArg, CoreExpr)
   5 import DefSyn(DefBindee)
   6 import Id(Id)
   7 import SplitUniq(SplitUniqSupply)
   8 import UniType(UniType)
   9 import UniqFM(UniqFM)
  10 tran :: (a -> SwitchResult) -> UniqFM (CoreExpr Id DefBindee) -> UniqFM UniType -> CoreExpr Id DefBindee -> [CoreArg DefBindee] -> SplitUniqSupply -> CoreExpr Id DefBindee
  11         {-# GHC_PRAGMA _A_ 5 _U_ 222222 _N_ _S_ "LLLSL" _N_ _N_ #-}
  12