fix pretty-printing bug concerning unit type
commite9ceea664bebf52aa3e9939e1d184fbe53f40994
authorJanis Voigtländer <jvoigtlaender@users.noreply.github.com>
dateFri 2 Oct 2015, 11:50 (11 years ago)
parent719f335
src/Elm/Compiler/Type.hs+3
@@ -59,6 +59,9 @@ toDoc context tipe =
5959 P.text (if name == "_Tuple0" then "()" else name)
6060
6161 App (Type name) args
62+ | name == "_Tuple0" ->
63+ P.text "()"
64+
6265 | Help.isTuple name ->
6366 P.sep
6467 [ P.cat (zipWith (<+>) (P.lparen : repeat P.comma) (map (toDoc None) args))