e4ce759 · elk · git.iko.soy

on master help sign in

Improve the missing field error message a bit

e4ce759Evan Czaplicki12 years ago

src/Type/Unify.hs+3−1

@@ -305,7 +305,9 @@ fieldMismatchError :: Map.Map String a -> String

305fieldMismatchError missingFields =

306 case Map.keys missingFields of

307 [] -> ""

308+ [key] ->

308− [key] -> "Looks like one record is missing field " ++ key

309+ "Looks like a record is missing the field '" ++ key ++ "'.\n" ++

310+ "Maybe there is a misspelling in a record access or record update?"

309 keys ->

311 keys ->

310 "Looks like one record is missing fields "

312 "Looks like one record is missing fields "

311 ++ List.intercalate ", " (init keys) ++ ", and " ++ last keys

313 ++ List.intercalate ", " (init keys) ++ ", and " ++ last keys