pprParendExpr expr]
#endif
-ppr_expr add_par (Note InlineCall expr)
- = add_par (ptext SLIT("__inline_call") <+> pprParendExpr expr)
-
ppr_expr add_par (Note InlineMe expr)
= add_par $ ptext SLIT("__inline_me") <+> pprParendExpr expr
doc | no_info = empty
| otherwise
- = brackets $ hcat [ppr prag_info, ppr occ_info,
+ = brackets $ hsep [ppr prag_info, ppr occ_info,
ppr dmd_info, ppr lbv_info
#ifdef OLD_STRICTNESS
, ppr (demandInfo id)