diff --git a/extra/math/primes/list/list.factor b/extra/math/primes/list/list.factor index 08212840c3..7467d126d0 100644 --- a/extra/math/primes/list/list.factor +++ b/extra/math/primes/list/list.factor @@ -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 ;