2008-03-11 22:58:50 -04:00
|
|
|
USING: io.crc32 io.encodings.ascii io.files kernel math ;
|
2008-02-27 20:24:50 -05:00
|
|
|
IN: benchmark.crc32
|
|
|
|
|
|
|
|
|
|
: crc32-primes-list ( -- )
|
|
|
|
|
10 [
|
|
|
|
|
"extra/math/primes/list/list.factor" resource-path
|
2008-03-11 22:58:50 -04:00
|
|
|
ascii file-contents crc32 drop
|
2008-02-27 20:24:50 -05:00
|
|
|
] times ;
|
|
|
|
|
|
|
|
|
|
MAIN: crc32-primes-list
|
