diff --git a/Data/BloomFilter/Easy.hs b/Data/BloomFilter/Easy.hs index 5143c6e..1a38a09 100644 --- a/Data/BloomFilter/Easy.hs +++ b/Data/BloomFilter/Easy.hs @@ -72,7 +72,7 @@ safeSuggestSizing capacity errRate minimum [((-k) * cap / log (1 - (errRate ** (1 / k))), k) | k <- [1..100]] roundedBits = nextPowerOfTwo (ceiling bits) - in if roundedBits <= 0 || roundedBits > 0xffffffff + in if roundedBits <= 0 || roundedBits > 0x7fffffff then Left "capacity too large to represent" else Right (roundedBits, truncate hashes)