benchmark.bloom-filters: adding a benchmark for bloom filters.
parent
ec74336c7b
commit
d47a306557
|
@ -0,0 +1,11 @@
|
||||||
|
USING: bloom-filters kernel math ;
|
||||||
|
|
||||||
|
IN: benchmark.bloom-filters
|
||||||
|
|
||||||
|
: bloom-filters-benchmark ( -- )
|
||||||
|
0.01 2000 <bloom-filter> 100,000 [
|
||||||
|
100 over bloom-filter-insert
|
||||||
|
100 over bloom-filter-member? drop
|
||||||
|
] times drop ;
|
||||||
|
|
||||||
|
MAIN: bloom-filters-benchmark
|
Loading…
Reference in New Issue