diff options
| author | Simon Peyton Jones <simonpj@microsoft.com> | 2017-02-17 14:50:59 +0000 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2017-02-20 13:33:12 -0500 |
| commit | 2d5be63d1140a409eb18d1a77d439053844f7ce7 (patch) | |
| tree | 788de731ff517049b1b0ed79bd4f21e67aacc3f1 /compiler/coreSyn | |
| parent | 0aafe5191c3c4b83cc414fb5cb31d2e6f100bee0 (diff) | |
| download | haskell-2d5be63d1140a409eb18d1a77d439053844f7ce7.tar.gz | |
Change -dppr-ticks to -dsuppress-ticks
I spent about two hours today hunting fruitlessly for a simplifier
bug (when fixing Trac #13255), only to find that it was caused by
-ddump-X silently suppressing all ticks in Core.
I think this has happened to me once before.
So I've changed to make tick-printing on by default (like coercions,
etc), with a flag -dsuppress-ticks (like -dsuppress-coercions) to
suppress them.
Blargh.
-dppr-ticks is still there, but deprecated.
Diffstat (limited to 'compiler/coreSyn')
| -rw-r--r-- | compiler/coreSyn/PprCore.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/compiler/coreSyn/PprCore.hs b/compiler/coreSyn/PprCore.hs index a8dc2179a1..994c237529 100644 --- a/compiler/coreSyn/PprCore.hs +++ b/compiler/coreSyn/PprCore.hs @@ -274,9 +274,9 @@ ppr_expr add_par (Let bind expr) ppr_expr add_par (Tick tickish expr) = sdocWithDynFlags $ \dflags -> - if gopt Opt_PprShowTicks dflags - then add_par (sep [ppr tickish, pprCoreExpr expr]) - else ppr_expr add_par expr + if gopt Opt_SuppressTicks dflags + then ppr_expr add_par expr + else add_par (sep [ppr tickish, pprCoreExpr expr]) pprCoreAlt :: OutputableBndr a => (AltCon, [a] , Expr a) -> SDoc pprCoreAlt (con, args, rhs) |