core: Rename iota to <iota> so we can have TUPLE: iota ... ; instead of TUPLE: iota...

[factor.git] / extra / benchmark / sha1 / sha1.factor

diff --git a/extra/benchmark/sha1/sha1.factor b/extra/benchmark/sha1/sha1.factor
index 50675645e067007f28bf25da16a253b64a95f75c..523de80627e0b32f6c2977c8f9c411867c6568ab 100644 (file)
--- a/extra/benchmark/sha1/sha1.factor
+++ b/extra/benchmark/sha1/sha1.factor
@@ -2,17 +2,17 @@ USING: checksums checksums.sha sequences byte-arrays kernel ;
 IN: benchmark.sha1
 
 : sha1-benchmark ( -- )
-    2000000 iota >byte-array sha1 checksum-bytes drop ;
+    2000000 <iota> >byte-array sha1 checksum-bytes drop ;
 
 : sha224-benchmark ( -- )
-    2000000 iota >byte-array sha-224 checksum-bytes drop ;
+    2000000 <iota> >byte-array sha-224 checksum-bytes drop ;
 
 : sha256-benchmark ( -- )
-    2000000 iota >byte-array sha-256 checksum-bytes drop ;
+    2000000 <iota> >byte-array sha-256 checksum-bytes drop ;
 
 USE: checksums.openssl
 
 : openssl-sha1-benchmark ( -- )
-    2000000 iota >byte-array openssl-sha1 checksum-bytes drop ;
+    2000000 <iota> >byte-array openssl-sha1 checksum-bytes drop ;
 
 MAIN: sha1-benchmark