mkUnpackCase bndr arg unpk_args boxing_con body
= Case cast_arg bndr (exprType body) [(DataAlt boxing_con, unpk_args, body)]
where
mkUnpackCase bndr arg unpk_args boxing_con body
= Case cast_arg bndr (exprType body) [(DataAlt boxing_con, unpk_args, body)]
where