ghc/compiler/deforest/Cyclic.hi

   1 {-# GHC_PRAGMA INTERFACE VERSION 3 #-}
   2 interface Cyclic where
   3 import CoreSyn(CoreExpr)
   4 import DefSyn(DefBindee)
   5 import Id(Id)
   6 import SplitUniq(SplitUniqSupply)
   7 fixupFreeVars :: [Id] -> Id -> CoreExpr Id DefBindee -> ((Id, CoreExpr Id DefBindee), [(Id, CoreExpr Id DefBindee)])
   8 mkLoops :: CoreExpr Id DefBindee -> SplitUniqSupply -> ([(Id, CoreExpr Id DefBindee)], CoreExpr Id DefBindee)
   9