!1640: Remove redundant special case in STG pretty-printer · Merge requests · Glasgow Haskell Compiler / GHC

This special case existed for no reason, and made things inconsistent.

Before

Boolean.$bT :: Boolean.Boolean
[GblId, Str=m, Unf=OtherCon []] =
    CAF_ccs  \ u  []  Boolean.$bT1;

After

Boolean.$bF :: Boolean.Boolean
[GblId, Str=m, Unf=OtherCon []] =
    \u [] Boolean.$bF1;

The cost-centre is now hidden when not profiling, as is the case with other types of closures.

Remove redundant special case in STG pretty-printer