diff options
Diffstat (limited to 'compiler/profiling/CostCentre.hs')
| -rw-r--r-- | compiler/profiling/CostCentre.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/profiling/CostCentre.hs b/compiler/profiling/CostCentre.hs index 4dd54dcc6c..e5fcf315ff 100644 --- a/compiler/profiling/CostCentre.hs +++ b/compiler/profiling/CostCentre.hs @@ -255,9 +255,9 @@ pprCostCentreCore (NormalCC {cc_key = key, cc_name = n, cc_mod = m, cc_loc = loc cc_is_caf = caf}) = text "__scc" <+> braces (hsep [ ppr m <> char '.' <> ftext n, - ifPprDebug (ppr key), + whenPprDebug (ppr key), pp_caf caf, - ifPprDebug (ppr loc) + whenPprDebug (ppr loc) ]) pp_caf :: IsCafCC -> SDoc |