json-stream 0.4.2.2 → 0.4.2.3

raw patch · 4 files changed

+11/−3 lines, 4 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

Data/JsonStream/CLexer.hs +1/−1
changelog.md +8/−0
json-stream.cabal +1/−1
test/ParserSpec.hs +1/−1

Data/JsonStream/CLexer.hs view

@@ -133,7 +133,7 @@     let       (csign, r1) = parseSign tnumber :: (Int, BS.ByteString)       ((num, numdigits), r2) = parseDecimal r1 :: ((Integer, Int), BS.ByteString)-      ((frac, frdigits), r3) = parseFract r2 :: ((Int, Int), BS.ByteString)+      ((frac, frdigits), r3) = parseFract r2 :: ((Integer, Int), BS.ByteString)       (texp, rest) = parseE r3     when (numdigits == 0 || not (BS.null rest)) Nothing     let dpart = fromIntegral csign * (num * (10 ^ frdigits) + fromIntegral frac) :: Integer

changelog.md view

@@ -1,3 +1,11 @@+# 0.4.2.3++Fix 32-bit number parsing.++# 0.4.2.2++Speed optimization of `many` and aeson object.+ # 0.4.2.0 Added Semigroup instance, compatibility with base-4.11

json-stream.cabal view

@@ -1,5 +1,5 @@ name:                json-stream-version:             0.4.2.2+version:             0.4.2.3 synopsis:            Incremental applicative JSON parser description:         Easy to use JSON parser fully supporting incremental parsing.                      Parsing grammar in applicative form.

test/ParserSpec.hs view

@@ -222,7 +222,7 @@     let res1 = parse (arrayOf value) test :: [Integer]     res1 `shouldBe` [-9999999999999999999999999,-999999999999,-9999999,-30000,-10000,0,10000,80000,9999,9999999, 999999999999, 18446744073709551000, 9999999999999999999999999, 4294967295] -    let res2 = parse (arrayOf integer) test :: [Int]+    let res2 = parse (arrayOf integer) test :: [Int64]     res2 `shouldBe` [-999999999999,-9999999,-30000,-10000,0,10000,80000,9999,9999999, 999999999999, 4294967295]      let res3 = parse (arrayOf integer) test :: [Word64]