SetLevels
Documentation
setLevels :: FloatOutSwitches -> [CoreBind] -> UniqSupply -> [LevelledBind]
type LevelledBind = TaggedBind FloatSpec
type LevelledExpr = TaggedExpr FloatSpec
type LevelledBndr = TaggedBndr FloatSpec
floatSpecLevel :: FloatSpec -> Level
incMinorLvl :: Level -> Level