]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/benchmark/dawes/dawes.factor
core: Rename iota to <iota> so we can have TUPLE: iota ... ; instead of TUPLE: iota...
[factor.git] / extra / benchmark / dawes / dawes.factor
index 839bd89dc06792a632fdfc01b3f44e1c547d0011..3a4180061b11bd41de52340062611c47d5f7d4fe 100644 (file)
@@ -8,7 +8,7 @@ IN: benchmark.dawes
 : count-ones ( int-array -- n ) [ 1 = ] count ; inline
 
 : make-int-array ( -- int-array )
-    120000 iota [ 255 bitand ] int-array{ } map-as ; inline
+    120000 <iota> [ 255 bitand ] int-array{ } map-as ; inline
 
 : dawes-benchmark ( -- )
     200 make-int-array '[ _ count-ones ] replicate drop ;