Memoize small primes list
This makes "benchmark.binary-search" work again in a reasonable time.db4
parent
ca0f3659e4
commit
f521805bb3
|
@ -1,4 +1,4 @@
|
|||
USING: math.primes ;
|
||||
USING: math.primes memoize ;
|
||||
IN: math.primes.list
|
||||
|
||||
: primes-under-million ( -- seq ) 1000000 primes-upto ;
|
||||
MEMO: primes-under-million ( -- seq ) 1000000 primes-upto ;
|
||||
|
|
Loading…
Reference in New Issue