LibZip 0.10.1 → 0.10.2
raw patch · 2 files changed
+11/−12 lines, 2 filesdep ~basePVP ok
version bump matches the API change (PVP)
Dependency ranges changed: base
API changes (from Hackage documentation)
Files
- Codec/Archive/LibZip.hs +6/−6
- LibZip.cabal +5/−6
Codec/Archive/LibZip.hs view
@@ -384,11 +384,11 @@ runPureSource src pState pData len cmd | cmd == c'ZIP_SOURCE_OPEN = return 0 | cmd == c'ZIP_SOURCE_READ = do- state <- peek (castPtr pState :: Ptr st)- case readSrc (src { srcState = state }) (fromIntegral len) state of- Just (len',bs,state') -> do+ s <- peek (castPtr pState :: Ptr st)+ case readSrc (src { srcState = s }) (fromIntegral len) s of+ Just (len',bs,s') -> do pokeArray (castPtr pData :: Ptr Word8) (map (toEnum.fromEnum) bs)- poke (castPtr pState) state'+ poke (castPtr pState) s' return (fromIntegral len') Nothing -> return (-1) | cmd == c'ZIP_SOURCE_CLOSE = return 0@@ -410,7 +410,7 @@ return $ fromIntegral (2 * sizeOf esys) | cmd == c'ZIP_SOURCE_FREE = return 0 | otherwise = return (-1)- + -- | Get zip archive comment. getComment :: [FileFlag] -- ^ 'FileUNCHANGED' can be used. -> Archive (Maybe String)@@ -477,7 +477,7 @@ -- | Set comment for a file in the archive (referenced by position index). setFileCommentIx :: Integer -- ^ Position index of a file in the archive.- -> String -- ^ New file comment. + -> String -- ^ New file comment. -> Archive () setFileCommentIx i comment = do z <- getZip
LibZip.cabal view
@@ -1,11 +1,11 @@ Name: LibZip-Version: 0.10.1+Version: 0.10.2 License: BSD3 License-File: LICENSE Author: Sergey Astanin Maintainer: Sergey Astanin <s.astanin@gmail.com>-Homepage: http://bitbucket.org/jetxee/hs-libzip/-Bug-reports: http://bitbucket.org/jetxee/hs-libzip/issues/+Homepage: http://bitbucket.org/astanin/hs-libzip/+Bug-reports: http://bitbucket.org/astanin/hs-libzip/issues/ Category: Codec, Foreign Synopsis: Bindings to libzip, a library for manipulating zip archives.@@ -15,7 +15,7 @@ Build-Type: Simple Cabal-Version: >= 1.2.3-Tested-With: GHC == 7.0.3, GHC == 7.2.2, GHC == 7.4.1+Tested-With: GHC == 7.4.1, GHC == 7.6.1 Extra-Source-Files: examples/hzip.hs@@ -29,7 +29,7 @@ Other-Modules: Codec.Archive.LibZip.Errors Build-Depends:- base >= 4.0 && < 4.6+ base >= 4.0 && < 5.0 , bindings-libzip >= 0.10 && < 0.11 , bytestring , filepath@@ -37,4 +37,3 @@ , mtl GHC-Options: -Wall-