We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 10ee4b0 commit d1364e4Copy full SHA for d1364e4
Data/Aeson/Parser/Internal.hs
@@ -277,6 +277,7 @@ eitherDecodeWith p to s =
277
IError path msg -> Left (path, msg)
278
L.Fail _ ctx msg -> Left ([], buildMsg ctx msg)
279
where
280
+ buildMsg :: [String] -> String -> String
281
buildMsg [] msg = msg
282
buildMsg (expectation:_) msg =
283
msg ++ ". Expecting " ++ expectation
0 commit comments