pprCLbl (RtsLabel (RtsApFast str))   = ftext str <> ptext (sLit "_fast")
pprCLbl (RtsLabel (RtsApFast str))   = ftext str <> ptext (sLit "_fast")
pprCLbl (RtsLabel (RtsApFast str))   = ftext str <> ptext (sLit "_fast")