on master help sign in
Merge branch 'master' into dev
fa9bfb9Evan Czaplicki
src/Elm/Compiler/Type.hs+3
@@ -59,6 +59,9 @@ toDoc context tipe =
59 P.text (if name == "_Tuple0" then "()" else name)
59 P.text (if name == "_Tuple0" then "()" else name)
60
60
61 App (Type name) args
61 App (Type name) args
62+ | name == "_Tuple0" ->
63+ P.text "()"
64+
62 | Help.isTuple name ->
65 | Help.isTuple name ->
63 P.sep
66 P.sep
64 [ P.cat (zipWith (<+>) (P.lparen : repeat P.comma) (map (toDoc None) args))
67 [ P.cat (zipWith (<+>) (P.lparen : repeat P.comma) (map (toDoc None) args))