pack_continuation curr_format cont_format ++
[CmmJump target arguments]
where
cont_format = maybe unknown_block id $
lookup (mkReturnPtLabel $ getUnique next) formats
pack_continuation curr_format cont_format ++
[CmmJump target arguments]
where
cont_format = maybe unknown_block id $
lookup (mkReturnPtLabel $ getUnique next) formats
--------------------------------------------------------------------------------
-- Functions that generate CmmStmt sequences
--------------------------------------------------------------------------------
-- Functions that generate CmmStmt sequences