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

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

diff --git a/extra/benchmark/make/make.factor b/extra/benchmark/make/make.factor
index 9eb8d155f1376b0e8e35d89a14300f73ddc9e2c2..b28c202c8bac4eb6b10808074af18fa8a069b915 100644 (file)
--- a/extra/benchmark/make/make.factor
+++ b/extra/benchmark/make/make.factor
@@ -9,13 +9,13 @@ IN: benchmark.make
     [ [ CHAR: a , ] times ] "" make ;
 
 : make-arrays ( n -- seq )
-    [ iota % ] { } make ;
+    [ <iota> % ] { } make ;
 
 : make-vectors ( n -- seq )
-    [ iota % ] V{ } make ;
+    [ <iota> % ] V{ } make ;
 
 : make-benchmark ( -- )
-    5,000 iota [
+    5,000 <iota> [
         [ make-strings ] [ make-arrays ] [ make-vectors ] tri
         3drop
     ] each ;