Use the largest source file to benchmark checksums
"extra/math/primes/list.factor" is very small. Replace it with the largest factor source file in benchmarks.db4
parent
5d988b04fa
commit
2638db02d1
|
@ -1,10 +1,10 @@
|
|||
USING: checksums checksums.crc32 io.encodings.ascii io.files kernel math ;
|
||||
IN: benchmark.crc32
|
||||
|
||||
: crc32-primes-list ( -- )
|
||||
: crc32-file ( -- )
|
||||
10 [
|
||||
"resource:extra/math/primes/list/list.factor"
|
||||
"resource:basis/mime/multipart/multipart-tests.factor"
|
||||
crc32 checksum-file drop
|
||||
] times ;
|
||||
|
||||
MAIN: crc32-primes-list
|
||||
MAIN: crc32-file
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
USING: checksums checksums.md5 io.files kernel ;
|
||||
IN: benchmark.md5
|
||||
|
||||
: md5-primes-list ( -- )
|
||||
"resource:extra/math/primes/list/list.factor" md5 checksum-file drop ;
|
||||
: md5-file ( -- )
|
||||
"resource:basis/mime/multipart/multipart-tests.factor" md5 checksum-file drop ;
|
||||
|
||||
MAIN: md5-primes-list
|
||||
MAIN: md5-file
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
USING: checksums checksums.sha1 io.files kernel ;
|
||||
IN: benchmark.sha1
|
||||
|
||||
: sha1-primes-list ( -- )
|
||||
"resource:extra/math/primes/list/list.factor" sha1 checksum-file drop ;
|
||||
: sha1-file ( -- )
|
||||
"resource:basis/mime/multipart/multipart-tests.factor" sha1 checksum-file drop ;
|
||||
|
||||
MAIN: sha1-primes-list
|
||||
MAIN: sha1-file
|
||||
|
|
Loading…
Reference in New Issue