diff options
| author | Gergo ERDI <gergo@erdi.hu> | 2021-11-15 14:00:36 +0800 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-11-25 05:01:59 -0500 |
| commit | cf5279ed3733943eabd5fcd2dccab119ebfab9c2 (patch) | |
| tree | 78d667be0ee38d019ba6677c201ad2b09482234f | |
| parent | b24e8d912cf3fe37a132c91fa640939fcff79215 (diff) | |
| download | haskell-cf5279ed3733943eabd5fcd2dccab119ebfab9c2.tar.gz | |
Use `simplify` in non-optimizing build pipeline (#20500)
| -rw-r--r-- | compiler/GHC/Core/Opt/Pipeline.hs | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/compiler/GHC/Core/Opt/Pipeline.hs b/compiler/GHC/Core/Opt/Pipeline.hs index ee79e28b60..9c4ad7d3a4 100644 --- a/compiler/GHC/Core/Opt/Pipeline.hs +++ b/compiler/GHC/Core/Opt/Pipeline.hs @@ -221,10 +221,8 @@ getCoreToDo logger dflags core_todo = if opt_level == 0 then - [ static_ptrs_float_outwards, - CoreDoSimplify max_iter - (base_mode { sm_phase = FinalPhase - , sm_names = ["Non-opt simplification"] }) + [ static_ptrs_float_outwards + , simplify "Non-opt simplification" , add_caller_ccs ] |