@@ -6,7 +6,7 @@ import SourceSyntax.PrettyPrint
66import qualified Text.PrettyPrint as PP
77
88data Literal = IntNum Int
9− | FloatNum Float
9+ | FloatNum Double
1010 | Chr Char
1111 | Str String
1212 | Boolean Bool
@@ -16,7 +16,7 @@ instance Pretty Literal where
1616 pretty literal =
1717 case literal of
1818 IntNum n -> PP.int n
19− FloatNum n -> PP.float n
19+ FloatNum n -> PP.double n
2020 Chr c -> PP.quotes (PP.char c)
2121 Str s -> PP.text (show s)
2222 Boolean bool -> PP.text (show bool)