(OutputableBndrId id, Outputable body)
        => [LStmt id body] -> SDoc
-- Show list comprehension qualifiers separated by commas
pprQuals quals = interpp'SP quals

{-
*******
pprQuals :: (OutputableBndrId id, Outputable body)
        => [LStmt id body] -> SDoc
pprQuals quals = interpp'SP quals
pprQuals quals = interpp'SP quals