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

benchmark.binary-search: cleanup

db4
Slava Pestov 2010-04-17 00:57:53 -05:00
parent 8ed8d2d8ad
commit b7631c98cf
1 changed files with 4 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
extra/benchmark/binary-search/binary-search.factor
View File

@ -1,12 +1,10 @@
! Copyright (C) 2008 Slava Pestov. ! Copyright (C) 2008, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: binary-search compiler.units kernel math.primes math.ranges USING: binary-search kernel math.primes math.ranges memoize
memoize prettyprint sequences ; prettyprint sequences ;
IN: benchmark.binary-search IN: benchmark.binary-search
[ MEMO: primes-under-million ( -- seq ) 1000000 primes-upto ;
MEMO: primes-under-million ( -- seq ) 1000000 primes-upto ;
] with-compilation-unit
! Force computation of the primes list before benchmarking the binary search ! Force computation of the primes list before benchmarking the binary search
primes-under-million drop primes-under-million drop