diff options
Diffstat (limited to 'compiler/GHC/Core/Opt/Monad.hs')
| -rw-r--r-- | compiler/GHC/Core/Opt/Monad.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/compiler/GHC/Core/Opt/Monad.hs b/compiler/GHC/Core/Opt/Monad.hs index 3c6ff07a65..32b7b9d3d4 100644 --- a/compiler/GHC/Core/Opt/Monad.hs +++ b/compiler/GHC/Core/Opt/Monad.hs @@ -132,6 +132,7 @@ data CoreToDo -- These are diff core-to-core passes, | CorePrep | CoreAddCallerCcs | CoreOccurAnal + | CoreDoOptCoercion instance Outputable CoreToDo where ppr (CoreDoSimplify _ _) = text "Simplifier" @@ -154,6 +155,7 @@ instance Outputable CoreToDo where ppr CoreAddCallerCcs = text "Add caller cost-centres" ppr CorePrep = text "CorePrep" ppr CoreOccurAnal = text "Occurrence analysis" + ppr CoreDoOptCoercion = text "Coercion optimization" ppr CoreDoPrintCore = text "Print core" ppr (CoreDoRuleCheck {}) = text "Rule check" ppr CoreDoNothing = text "CoreDoNothing" |