Commit 9182cbf4 authored by simonpj's avatar simonpj
Browse files

[project @ 2004-03-11 14:29:29 by simonpj]

Better layout in interppSP
parent 56edf70a
...@@ -414,10 +414,10 @@ pprWithCommas :: (a -> SDoc) -> [a] -> SDoc ...@@ -414,10 +414,10 @@ pprWithCommas :: (a -> SDoc) -> [a] -> SDoc
pprWithCommas pp xs = fsep (punctuate comma (map pp xs)) pprWithCommas pp xs = fsep (punctuate comma (map pp xs))
interppSP :: Outputable a => [a] -> SDoc interppSP :: Outputable a => [a] -> SDoc
interppSP xs = hsep (map ppr xs) interppSP xs = sep (map ppr xs)
interpp'SP :: Outputable a => [a] -> SDoc interpp'SP :: Outputable a => [a] -> SDoc
interpp'SP xs = hsep (punctuate comma (map ppr xs)) interpp'SP xs = sep (punctuate comma (map ppr xs))
pprQuotedList :: Outputable a => [a] -> SDoc pprQuotedList :: Outputable a => [a] -> SDoc
-- [x,y,z] ==> `x', `y', `z' -- [x,y,z] ==> `x', `y', `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