fix pretty printer for chars
commitfe23c0e66dc808c2f96d7f5870cd88636cd64338
authorEvan Czaplicki <evan@Evans-MacBook-Air.local>
dateSat 13 Jul 2013, 01:05 (13 years ago)
parent7f43392
compiler/SourceSyntax/Literal.hs+1−1
@@ -17,6 +17,6 @@ instance Pretty Literal where
1717 case literal of
1818 IntNum n -> PP.int n
1919 FloatNum n -> PP.float n
20− Chr c -> PP.char c
20+ Chr c -> PP.quotes (PP.char c)
2121 Str s -> PP.text (show s)
2222 Boolean bool -> PP.text (show bool)