streaming-binary 0.2.1.0 → 0.2.2.0
raw patch · 2 files changed
+2/−2 lines, 2 files
Files
- src/Streaming/Binary.hs +1/−1
- streaming-binary.cabal +1/−1
src/Streaming/Binary.hs view
@@ -74,7 +74,7 @@ go (total + nconsumed) decoder0 (Q.chunk bs >> p') go !total (Binary.Done leftover nconsumed x) p = do S.yield x- go (total + nconsumed) decoder0 (Q.chunk leftover >> p)+ go (total + nconsumed) (decoder0 `Binary.pushChunk` leftover) p go !total (Binary.Partial k) p = do lift (Q.nextChunk p) >>= \case Left res -> go total (k Nothing) (return res)
streaming-binary.cabal view
@@ -1,5 +1,5 @@ name: streaming-binary-version: 0.2.1.0+version: 0.2.2.0 synopsis: Streaming interface to binary. homepage: https://github.com/mboes/streaming-binary#readme license: BSD3