diff options
Diffstat (limited to 'compiler/simplCore/OccurAnal.lhs')
| -rw-r--r-- | compiler/simplCore/OccurAnal.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/simplCore/OccurAnal.lhs b/compiler/simplCore/OccurAnal.lhs index 13e468f685..52c564507a 100644 --- a/compiler/simplCore/OccurAnal.lhs +++ b/compiler/simplCore/OccurAnal.lhs @@ -880,7 +880,7 @@ reOrderNodes depth bndr_set weak_fvs (node : nodes) binds | Just inl_source <- isStableCoreUnfolding_maybe (idUnfolding bndr) = case inl_source of - InlineWrapper {} -> 10 -- Note [INLINE pragmas] + InlineWrapper -> 10 -- Note [INLINE pragmas] _other -> 3 -- Data structures are more important than this -- so that dictionary/method recursion unravels -- Note that this case hits all InlineRule things, so we |