pureMD5 2.1.0.1 → 2.1.0.2
raw patch · 2 files changed
+5/−3 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- Data/Digest/Pure/MD5.hs +2/−1
- pureMD5.cabal +3/−2
Data/Digest/Pure/MD5.hs view
@@ -36,6 +36,7 @@ import Data.ByteString.Unsafe (unsafeUseAsCString) import qualified Data.ByteString as B import qualified Data.ByteString.Lazy as L+import Data.ByteString.Unsafe (unsafeDrop) import Data.ByteString.Internal import Data.Bits import Data.List@@ -121,7 +122,7 @@ | B.length bs == 0 = ctx | otherwise = let !new = performMD5Update ctx bs- in blockAndDo new (B.drop blockSizeBytes bs)+ in blockAndDo new (unsafeDrop blockSizeBytes bs) {-# INLINE blockAndDo #-} -- Assumes ByteString length == blockSizeBytes, will fold the
pureMD5.cabal view
@@ -1,5 +1,5 @@ name: pureMD5-version: 2.1.0.1+version: 2.1.0.2 license: BSD3 license-file: LICENSE author: Thomas DuBuisson <thomas.dubuisson@gmail.com>@@ -28,6 +28,7 @@ Executable md5Test main-is: Test/main.hs- Build-Depends: base, QuickCheck, crypto-api, bytestring, cereal+ if flag(test)+ Build-Depends: base, QuickCheck, crypto-api, bytestring, cereal if !flag(test) buildable: False