Fix formatting of error when there are two unbound type variables
commitdebfd18444b9d931d194e6ac3ea0fbebe9881c02
authorEvan Czaplicki <info@elm-lang.org>
dateSat 19 Oct 2013, 10:52 (13 years ago)
parent692d8d8
compiler/Transform/Check.hs+2−2
@@ -94,11 +94,11 @@ illFormedTypes decls = map report (Maybe.mapMaybe isIllFormed (aliases ++ adts))
9494 listing =
9595 case tvars of
9696 [tvar] -> " " ++ quote tvar ++ " is"
97− _ -> "s " ++ addCommas (addAnd (map quote tvars)) ++ " are"
97+ _ -> "s" ++ addCommas (map ((++) " ") (addAnd (map quote tvars))) ++ " are"
9898
9999 addCommas xs
100100 | length xs < 3 = concat xs
101− | otherwise = intercalate ", " xs
101+ | otherwise = intercalate "," xs
102102
103103 addAnd xs
104104 | length xs < 2 = xs