diff options
author | lassulus <lass@lassul.us> | 2017-05-09 13:27:15 +0200 |
---|---|---|
committer | lassulus <lass@lassul.us> | 2017-05-09 13:27:15 +0200 |
commit | fc00737409406536adf0b55196df56f1f0b92220 (patch) | |
tree | 082f0be533a4c8f1904032b8d8db13de51fa62b0 | |
parent | 53da2df0363d0729f24c4dc85fb3eeb2ed8d235e (diff) |
raise bloomfiler size again
-rw-r--r-- | news.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -46,7 +46,7 @@ main = do hSetBuffering stdout LineBuffering [url, delayString] <- getArgs let delay = read delayString :: Int - let bloom0 = Bloom.fromList (Bloom.cheapHashes 3) 4096 [""] + let bloom0 = Bloom.fromList (Bloom.cheapHashes 17) (2^10 * 1000) [""] rec url delay bloom0 return () where |