steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

bloom-filters: use all? instead of "map [ ] all?".

db4
John Benediktsson 2015-07-21 09:54:31 -07:00
parent d24733e703
commit a79f745a12
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/bloom-filters/bloom-filters-tests.factor
View File

@ -35,7 +35,7 @@ IN: bloom-filters.tests
! Should not generate bignum hash codes. Enhanced double hashing may generate a ! Should not generate bignum hash codes. Enhanced double hashing may generate a
! lot of hash codes, and it's better to do this earlier than later. ! lot of hash codes, and it's better to do this earlier than later.
{ t } [ 10000 iota [ double-hashcodes [ fixnum? ] both? ] map [ ] all? ] unit-test { t } [ 10000 iota [ double-hashcodes [ fixnum? ] both? ] all? ] unit-test
: empty-bloom-filter ( -- bloom-filter ) : empty-bloom-filter ( -- bloom-filter )
0.01 2000 <bloom-filter> ; 0.01 2000 <bloom-filter> ;