diff options
Diffstat (limited to 'compiler/deSugar/Coverage.hs')
| -rw-r--r-- | compiler/deSugar/Coverage.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/deSugar/Coverage.hs b/compiler/deSugar/Coverage.hs index 7faf8fb8ec..ddab00c888 100644 --- a/compiler/deSugar/Coverage.hs +++ b/compiler/deSugar/Coverage.hs @@ -111,8 +111,8 @@ addTicksToBinds hsc_env mod mod_loc exports tyCons binds modBreaks <- mkModBreaks hsc_env mod tickCount entries when (dopt Opt_D_dump_ticked dflags) $ - log_action dflags dflags NoReason SevDump noSrcSpan defaultDumpStyle - (pprLHsBinds binds1) + log_action dflags dflags NoReason SevDump noSrcSpan + (defaultDumpStyle dflags) (pprLHsBinds binds1) return (binds1, HpcInfo tickCount hashNo, Just modBreaks) |