]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/benchmark/ring/ring.factor
core: Rename iota to <iota> so we can have TUPLE: iota ... ; instead of TUPLE: iota...
[factor.git] / extra / benchmark / ring / ring.factor
index 509538a1751df7ece5f56119e9ad8636fe71a6f5..6281824a21a2ff75b92d5519069be889686f2f83 100644 (file)
@@ -13,7 +13,7 @@ SYMBOL: done
     ] times ;
 
 : send-messages ( messages target -- )
-    [ dup iota ] dip [ send ] curry each [ receive drop ] times ;
+    [ dup <iota> ] dip [ send ] curry each [ receive drop ] times ;
 
 : destroy-ring ( target -- )
     done swap send [ done eq? ] receive-if drop ;