diff options
| -rw-r--r-- | compiler/GHC/Core/Opt/Pipeline.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/compiler/GHC/Core/Opt/Pipeline.hs b/compiler/GHC/Core/Opt/Pipeline.hs index c3f2fc9f85..45e5330388 100644 --- a/compiler/GHC/Core/Opt/Pipeline.hs +++ b/compiler/GHC/Core/Opt/Pipeline.hs @@ -160,6 +160,7 @@ getCoreToDo dflags , sm_eta_expand = eta_expand_on , sm_inline = True , sm_case_case = True + , sm_case_bottom= False , sm_pre_inline = pre_inline_on } |