{-# GHC_PRAGMA INTERFACE VERSION 3 #-} interface TreelessForm where import CmdLineOpts(SwitchResult) import CoreSyn(CoreExpr) import DefSyn(DefBindee) import Id(Id) import SplitUniq(SplitUniqSupply) convertToTreelessForm :: (a -> SwitchResult) -> CoreExpr Id DefBindee -> SplitUniqSupply -> CoreExpr Id DefBindee