LinearScan.Hoopl
class NodeAlloc n v r
data NodeV n
blockInfo
opInfo
data SimpleUniqueMonad' a
runSimpleUniqueMonad'
allocateHoopl