factor/extra/benchmark/sha1/sha1.factor

USING: checksums checksums.sha1 io.files kernel ;
IN: benchmark.sha1

: sha1-file ( -- )
    "vocab:mime/multipart/multipart-tests.factor" sha1 checksum-file drop ;

MAIN: sha1-file
Fix problems found by builder 2008-05-01 21:02:34 -04:00			`USING: checksums checksums.sha1 io.files 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 ( -- )`
Add vocab: for vocab-relative paths 2009-02-15 20:53:21 -05:00			`"vocab:mime/multipart/multipart-tests.factor" sha1 checksum-file 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`