White space only
[ghc-hetmet.git] / compiler / simplCore / Simplify.lhs
index 5bcda0c..30cb321 100644 (file)
@@ -636,7 +636,6 @@ addNonRecWithUnf env new_bndr new_rhs new_unfolding
     addNonRec env final_id new_rhs
                -- The addNonRec adds it to the in-scope set too
 
-
 ------------------------------
 simplUnfolding :: SimplEnv-> TopLevelFlag
               -> Id    -- Debug output only
@@ -652,7 +651,6 @@ simplUnfolding env top_lvl bndr occ_info old_unf new_rhs    -- Note [Setting the ne
     omit_unfolding = isNonRuleLoopBreaker occ_info
 \end{code}
 
-
 Note [Setting the new unfolding]
 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 * If there's an INLINE pragma, we use substUnfolding to retain the