case mb_lhs of
Nothing -> do { warnDs decomp_msg; return Nothing }
- Just (_, args) -> do
-
- { f_body <- fix_up (Let mono_bind (Var mono_id))
+ Just (_, args) -> do {
+
+ f_body <- fix_up (Let mono_bind (Var mono_id))
; let local_poly = setIdNotExported poly_id
-- Very important to make the 'f' non-exported,