]> gitweb.factorcode.org Git - factor.git/commitdiff
Use the largest source file to benchmark checksums
authorSamuel Tardieu <sam@rfc1149.net>
Wed, 7 Jan 2009 09:32:26 +0000 (10:32 +0100)
committerSamuel Tardieu <sam@rfc1149.net>
Wed, 7 Jan 2009 09:40:00 +0000 (10:40 +0100)
"extra/math/primes/list.factor" is very small. Replace it with the
largest factor source file in benchmarks.

extra/benchmark/crc32/crc32.factor
extra/benchmark/md5/md5.factor
extra/benchmark/sha1/sha1.factor

index 0e5482da303678f9c395d6dd87b15f21e27aef48..2fea4eb1f198062a23bf50dc5c995f7fa002e0df 100755 (executable)
@@ -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
index 8a259c121789503676b66df2a1510ddc9824d787..24578ec677a799c8760155ddb921967ed50de0c7 100644 (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
index d5ff5673c2f5f120dfbfdb7aec1c77af41ead77e..585368e836b2190d68d9d4feea5d48dfb386e7a6 100644 (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