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