BlockId.hs-boot 147 Bytes
Newer Older
1 2 3 4 5 6 7 8
module BlockId (BlockId, mkBlockId) where

import Hoopl.Label (Label)
import Unique (Unique)

type BlockId = Label

mkBlockId :: Unique -> BlockId