Minimal buffer 1 -> 20.

ondrap · ondrap · commit 8191bf0e0fe7 · 2015-04-21T19:38:38.000+02:00
diff --git a/Data/JsonStream/CLexer.hs b/Data/JsonStream/CLexer.hs
@@ -224,7 +224,7 @@ parseResults (TempData {tmpNumbers=tmpNumbers, tmpBuffer=bs}) (err, hdr, rescoun
 
 -- | Estimate number of elements in a chunk
 estResultLimit :: BS.ByteString -> CInt
-estResultLimit dta = fromIntegral $ 1 + BS.length dta `div` 5
+estResultLimit dta = fromIntegral $ 20 + BS.length dta `div` 5
 
 getNextResult :: TempData -> TokenResult
 getNextResult tmp@(TempData {..})
