diff options
Diffstat (limited to 'compiler/simplCore/SimplCore.hs')
-rw-r--r-- | compiler/simplCore/SimplCore.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/compiler/simplCore/SimplCore.hs b/compiler/simplCore/SimplCore.hs index b8fb162432..3f577c18c0 100644 --- a/compiler/simplCore/SimplCore.hs +++ b/compiler/simplCore/SimplCore.hs @@ -314,7 +314,9 @@ getCoreToDo dflags -- reduce the possibility of shadowing -- Reason: see Note [Shadowing] in SpecConstr.hs - runWhen spec_constr CoreDoSpecConstr, + runWhen spec_constr + (CoreDoPasses [ CoreDoSpecConstr + , simpl_phase 0 ["post-spec-constr"] 1]), maybe_rule_check (Phase 0), |