diff options
| author |  Gabor Greif <ggreif@gmail.com> | 2016-01-27 14:43:23 +0100 |
|---|---|---|
| committer |  Joey Hess <joeyh@joeyh.name> | 2016-01-28 12:34:07 -0400 |
| commit | 89c0f7f72e16ef5ee0ce55df3ccfefa0f7f8f970 (patch) | |
| tree | 6cb92c2a11c9237a1b4e5abffe5e78710d767faa /Annex/BloomFilter.hs | |
| parent | a5cc649d3e33113599ca14e8e5e0579dae6b3b3a (diff) | |
Another redundant constraint
Diffstat (limited to 'Annex/BloomFilter.hs')
| -rw-r--r-- | Annex/BloomFilter.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Annex/BloomFilter.hs b/Annex/BloomFilter.hs index 040363a55..af467503a 100644 --- a/Annex/BloomFilter.hs +++ b/Annex/BloomFilter.hs @@ -49,5 +49,5 @@ genBloomFilter populate = do where lift = liftIO . stToIO -bloomFilter :: Hashable v => [v] -> Bloom v -> [v] +bloomFilter :: [v] -> Bloom v -> [v] bloomFilter l bloom = filter (\v -> v `notElemB` bloom) l |