1 2 3 4 5 6 7 8
module GHC.Cmm.BlockId (BlockId, mkBlockId) where import GHC.Cmm.Dataflow.Label (Label) import GHC.Types.Unique (Unique) type BlockId = Label mkBlockId :: Unique -> BlockId