Commit 13b1fa90 authored by benl's avatar benl

Always ppr case alts on separate lines

parent 38113ad2
......@@ -186,7 +186,7 @@ ppr_expr add_par (Case expr var ty alts)
<+> pprCoreExpr expr
<+> ifPprDebug (braces (ppr ty)),
ptext (sLit "of") <+> ppr_bndr var <+> char '{'],
nest 2 (sep (punctuate semi (map pprCoreAlt alts))),
nest 2 (vcat (punctuate semi (map pprCoreAlt alts))),
char '}'
]
where
......
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