import RegAllocInfo
import MachInstrs
import MachRegs
+import BlockId
import Cmm
-import LazyUniqFM
+import UniqFM
import UniqSet
import Outputable
import State
-- the info table from the CmmProc
countBlock info (BasicBlock blockId instrs)
| LiveInfo _ _ blockLive <- info
- , Just rsLiveEntry <- lookupUFM blockLive blockId
+ , Just rsLiveEntry <- lookupBlockEnv blockLive blockId
= countLIs rsLiveEntry instrs
| otherwise