Fix ambiguous type error only manifesting on GHC 7.10.x
commitd1364e482118c5317b8ad06ef1fcce3e87cb9931
authorAdam Bergmark <adam@bergmark.nl>
dateWed 24 Apr 2019, 16:36 (7 years ago)
parent10ee4b0
Data/Aeson/Parser/Internal.hs+1
@@ -277,6 +277,7 @@ eitherDecodeWith p to s =
277277 IError path msg -> Left (path, msg)
278278 L.Fail _ ctx msg -> Left ([], buildMsg ctx msg)
279279 where
280+ buildMsg :: [String] -> String -> String
280281 buildMsg [] msg = msg
281282 buildMsg (expectation:_) msg =
282283 msg ++ ". Expecting " ++ expectation