murmur-hash 0.1.0.9 → 0.1.0.10

raw patch · 4 files changed

+18/−13 lines, 4 filesdep ~basedep ~bytestringPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependency ranges changed: base, bytestring

API changes (from Hackage documentation)

- Data.Digest.Murmur32: instance Data.Digest.Murmur32.Hashable32 a => Data.Digest.Murmur32.Hashable32 (GHC.Base.Maybe a)

- Data.Digest.Murmur64: instance Data.Digest.Murmur64.Hashable64 a => Data.Digest.Murmur64.Hashable64 (GHC.Base.Maybe a)

+ Data.Digest.Murmur32: instance Data.Digest.Murmur32.Hashable32 a => Data.Digest.Murmur32.Hashable32 (GHC.Maybe.Maybe a)

+ Data.Digest.Murmur64: instance Data.Digest.Murmur64.Hashable64 a => Data.Digest.Murmur64.Hashable64 (GHC.Maybe.Maybe a)

- Data.Digest.Murmur64: combine :: (Hash64 -> Hash64) -> (Hash64 -> Hash64) -> (Hash64 -> Hash64)

+ Data.Digest.Murmur64: combine :: (Hash64 -> Hash64) -> (Hash64 -> Hash64) -> Hash64 -> Hash64

Files

Data/Digest/Murmur32.hs +4/−5
Data/Digest/Murmur64.hs +4/−4
changelog.md +5/−0
murmur-hash.cabal +5/−4

Data/Digest/Murmur32.hs view

@@ -19,13 +19,13 @@   ) where -import Data.Word+import Data.Word ( Word32 ) import Numeric ( showHex )-import Data.Bits+import Data.Bits ( Bits(xor, shiftR), FiniteBits(finiteBitSize) ) import qualified Data.ByteString as B import qualified Data.ByteString.Lazy as L import Data.Char ( ord )-import Data.Foldable+import Data.Foldable ( Foldable(foldl') ) import Data.List ( unfoldr )  -- | A 32 bit hash.@@ -39,7 +39,6 @@ asWord32 :: Hash32 -> Word32 asWord32 (Hash32 w) = w --- | Instance for class Hashable32 a where   hash32Add :: a -> Hash32 -> Hash32 @@ -60,7 +59,7 @@  hash32AddInt :: Int -> Hash32 -> Hash32 hash32AddInt !k0-  | bitSize (undefined :: Int) <= 32     -- Int is 32 bits+  | finiteBitSize (undefined :: Int) <= 32     -- Int is 32 bits     = hash32AddWord32 (fromIntegral k0)   | otherwise                            -- Int is 64 bits     = hash32AddWord32 (fromIntegral k0) `combine`

Data/Digest/Murmur64.hs view

@@ -19,13 +19,13 @@   ) where -import Data.Word+import Data.Word ( Word64 ) import Numeric ( showHex )-import Data.Bits+import Data.Bits ( Bits(xor, shiftR) ) import qualified Data.ByteString as B import qualified Data.ByteString.Lazy as L import Data.Char ( ord )-import Data.Foldable+import Data.Foldable ( Foldable(foldl') ) import Data.List ( unfoldr )  -- | A 64 bit hash.@@ -66,7 +66,7 @@   where f h a = hash64Add a h  -- | Create a hash using a custom seed.---h+-- -- The seed should be non-zero, but other than that can be an -- arbitrary number.  Different seeds will give different hashes, and -- thus (most likely) different hash collisions.

changelog.md view

@@ -1,3 +1,8 @@+### 0.1.0.10++  - Replace use of deprecated `bitSize` by `finiteBitSize`+  - Bump `bytestring` dependency to allow `0.11`+ ### 0.1.0.9    - Bump dependency ranges for GHC 8.0

murmur-hash.cabal view

@@ -1,5 +1,5 @@ Name:            murmur-hash-Version:         0.1.0.9+Version:         0.1.0.10 License:         BSD3 License-File:    LICENSE Author:          Thomas Schilling@@ -17,13 +17,14 @@ Category:        Data, Digest Stability:       provisional Build-Type:      Simple-Cabal-Version:   >= 1.6+Cabal-Version:   >= 1.10 Extra-Source-Files: changelog.md  Library+  Default-Language: Haskell2010   Build-Depends:-    base          >= 3.0 && < 5,-    bytestring    >= 0.9 && < 0.11+    base          >= 4.7 && < 5,+    bytestring    >= 0.9 && < 0.12    exposed-modules:     Data.Digest.Murmur32