How to avoid trailing whitespace generated by Text.PrettyPrint.HughesPJ?
simons at cryp.to
Fri Mar 8 13:10:07 CET 2013
it seems to me like the HughesPJ pretty printer has trouble dealing with
empty lines in a nested environment. Consider the following example:
> import Text.PrettyPrint.HughesPJ
> test1 = putStrLn $ render $ nest 4 $ vcat $ map text [ "line 1", "", "line 2" ]
The 'test1' function prints the following output, where blanks have been
replaced by underscores to make them visible:
Now, I would like to avoid this kind of trailing whitespace in the
document I'm generated -- but how? My first thought was to replace
text "" by empty, but that change effectively removes the empty line
> test2 = putStrLn $ render $ nest 4 $ vcat $ [ text "line 1", empty , text "line 2" ]
Is there another way to accomplish what I want?
More information about the Libraries