Use string concat
commit10ee4b033379037436a6224263b5d449c1891010
authorFintanH <fintan.halpenny@gmail.com>
dateWed 24 Apr 2019, 13:41 (7 years ago)
parent8549d90
Data/Aeson/Parser/Internal.hs+1−1
@@ -279,7 +279,7 @@ eitherDecodeWith p to s =
279279 where
280280 buildMsg [] msg = msg
281281 buildMsg (expectation:_) msg =
282− msg <> ". Expecting " <> expectation
282+ msg ++ ". Expecting " ++ expectation
283283{-# INLINE eitherDecodeWith #-}
284284
285285eitherDecodeStrictWith :: Parser Value -> (Value -> IResult a) -> B.ByteString