iteratee-compress 0.1.1 → 0.1.2

raw patch · 2 files changed

+10/−7 lines, 2 filesdep ~iterateePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: iteratee

API changes (from Hackage documentation)

Files

• Data/Iteratee/ZLib.hsc +8/−5
• iteratee-compress.cabal +2/−2

@@ -384,7 +384,8 @@  dumpZStream :: ZStream -> IO () dumpZStream zstr = withZStream zstr $ \zptr -> do-    IO.hPutStr stderr $ "<<ZStream"+    IO.hPutStr stderr $ "<<ZStream@"+    IO.hPutStr stderr $ (show zptr)     IO.hPutStr stderr . (" next_in=" ++) . show =<<         (#{peek z_stream, next_in} zptr :: IO (Ptr ()))     IO.hPutStr stderr . (" avail_in=" ++) . show =<<@@ -456,8 +457,10 @@ #endif                   joinIM $ doRun size run (Invalid zstr _in _out) iter               | otherwise = fillI-          fill' (EOF Nothing)-              = joinIM $ finish size run (Finishing zstr BS.empty) iter+          fill' (EOF Nothing) = do+              out <- liftIO $ pullOutBuffer zstr _out +              iter' <- lift $ enumPure1Chunk out iter+              joinIM $ finish size run (Finishing zstr BS.empty) iter'           fill' (EOF (Just err))               = case fromException err of                   Just err' ->@@ -561,7 +564,7 @@ finish size run fin@(Finishing zstr _in) iter = return $! do #ifdef DEBUG     liftIO $ IO.hPutStrLn stderr $-        "Finishing with out buffer of size" ++ show size+        "Finishing with out buffer of size " ++ show size #endif     _out <- liftIO $ putOutBuffer size zstr     status <- liftIO $ run zstr #{const Z_FINISH}@@ -677,4 +680,4 @@     dcmp <- liftIO $ mkDecompress f dp     case dcmp of         Left err -> enumErr err iter-        Right init -> insertOut size deflate' init iter+        Right init -> insertOut size inflate' init iter

@@ -1,5 +1,5 @@ Name:                iteratee-compress-Version:             0.1.1+Version:             0.1.2 Synopsis:            An enumerators for compressing and decompressing streams Description:         An enumerators for compressing and decompressing streams License:             BSD3@@ -20,7 +20,7 @@   Exposed-modules:   Data.Iteratee.ZLib   Build-depends:     base >= 4 && < 5,                      bytestring >= 0.9 && < 0.10,-                     iteratee >= 0.4 && < 5,+                     iteratee >= 0.4 && < 7,                      monads-fd >= 0.1 && < 0.2   Build-tools:       c2hs   Extensions:        CPP,