Commit 7721e8ee authored by Simon Peyton Jones's avatar Simon Peyton Jones

Make pprQuotedList use fsep not hsep

This just does wrapping on very long lists
parent 3c74a512
......@@ -1019,7 +1019,7 @@ pprQuotedList :: Outputable a => [a] -> SDoc
pprQuotedList = quotedList . map ppr
quotedList :: [SDoc] -> SDoc
quotedList xs = hsep (punctuate comma (map quotes xs))
quotedList xs = fsep (punctuate comma (map quotes xs))
quotedListWithOr :: [SDoc] -> SDoc
-- [x,y,z] ==> `x', `y' or `z'
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment