factor/extra/benchmark/sha1/sha1.factor

USING: checksums checksums.sha sequences byte-arrays kernel ;
IN: benchmark.sha1

: sha1-file ( -- )
    2000000 iota >byte-array sha1 checksum-bytes drop ;

MAIN: sha1-file
move sha1 and sha2 to checksums.sha, update usages 2009-05-17 18:58:36 -04:00			`USING: checksums checksums.sha sequences byte-arrays kernel ;`
add a sha1 benchmark 2008-01-14 16:43:33 -05:00			`IN: benchmark.sha1`

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. 2009-01-07 04:32:26 -05:00			`: sha1-file ( -- )`
Tweak some benchmark parameters 2009-04-17 18:55:01 -04:00			`2000000 iota >byte-array sha1 checksum-bytes drop ;`
add a sha1 benchmark 2008-01-14 16:43:33 -05:00
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. 2009-01-07 04:32:26 -05:00			`MAIN: sha1-file`