mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

Rather than crashing when there's a problem with the requested bloomfilter capacity/accuracy, fall back to a reasonable default bloom filter size.

Browse source
This commit is contained in:
Joey Hess 2014-09-12 12:26:12 -04:00
parent eb26f00c04
commit 7482166180
3 changed files with 10 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

4
Utility/Bloom.hs
View file

@ -9,7 +9,7 @@
module Utility.Bloom (
Bloom,
suggestSizing,
safeSuggestSizing,
Hashable,
cheapHashes,
notElemB,
@ -25,7 +25,7 @@ import qualified Data.BloomFilter as Bloom
#else
import qualified Data.BloomFilter as Bloom
#endif
import Data.BloomFilter.Easy (suggestSizing, Bloom)
import Data.BloomFilter.Easy (safeSuggestSizing, Bloom)
import Data.BloomFilter.Hash (Hashable, cheapHashes)
import Control.Monad.ST.Safe (ST)