extra/benchmark/crc32/crc32.factor

   1 USING: checksums checksums.crc32 io.encodings.ascii io.files kernel math ;
   2 IN: benchmark.crc32
   3
   4 : crc32-file ( -- )
   5     10 [
   6         "vocab:mime/multipart/multipart-tests.factor"
   7         crc32 checksum-file drop
   8     ] times ;
   9
  10 MAIN: crc32-file