]> gitweb.factorcode.org Git - factor.git/commitdiff
benchmark.binary-search: cleanup
authorSlava Pestov <slava@slava-pestovs-macbook-pro.local>
Sat, 17 Apr 2010 05:57:53 +0000 (00:57 -0500)
committerSlava Pestov <slava@slava-pestovs-macbook-pro.local>
Sat, 17 Apr 2010 05:57:53 +0000 (00:57 -0500)
extra/benchmark/binary-search/binary-search.factor

index 5883836b7dbb229055bd4ab35f841bc127e89377..a7af66ed7e1015a4a55df6444ebbcf6b320ab554 100644 (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.
-USING: binary-search compiler.units kernel math.primes math.ranges
-memoize prettyprint sequences ;
+USING: binary-search kernel math.primes math.ranges memoize
+prettyprint sequences ;
 IN: benchmark.binary-search
 
-[
-    MEMO: primes-under-million ( -- seq ) 1000000 primes-upto ;
-] with-compilation-unit
+MEMO: primes-under-million ( -- seq ) 1000000 primes-upto ;
 
 ! Force computation of the primes list before benchmarking the binary search
 primes-under-million drop