zip 0.1.7 → 0.1.8

raw patch · 3 files changed

+10/−4 lines, 3 filesdep ~zip

Dependency ranges changed: zip

Files

CHANGELOG.md +5/−0
Codec/Archive/Zip/Internal.hs +3/−2
zip.cabal +2/−2

CHANGELOG.md view

@@ -1,3 +1,8 @@+## Zip 0.1.8++* Fixed a bug that caused `zip` to write incorrect number of entries+  (instead of `0xffff`) in central directory when Zip64 feature is enabled.+ ## Zip 0.1.7  * Fix literal overflows on 32 bit systems.

Codec/Archive/Zip/Internal.hs view

@@ -871,9 +871,10 @@  withSaturation :: forall a b. (Integral a, Integral b, Bounded b) => a -> b withSaturation x =-  if fromIntegral x > (maxBound :: b)-    then maxBound :: b+  if (fromIntegral x :: Integer) > (fromIntegral bound :: Integer)+    then bound     else fromIntegral x+  where bound = maxBound :: b  -- | Determine target entry of action.

zip.cabal view

@@ -31,7 +31,7 @@ -- POSSIBILITY OF SUCH DAMAGE.  name:                 zip-version:              0.1.7+version:              0.1.8 cabal-version:        >= 1.10 license:              BSD3 license-file:         LICENSE.md@@ -106,7 +106,7 @@                     , text             >= 0.2     && < 1.3                     , time             >= 1.4     && < 1.8                     , transformers     >= 0.4     && < 0.6-                    , zip              >= 0.1.7+                    , zip              >= 0.1.8   default-language:   Haskell2010  source-repository head