]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/benchmark/wrap/wrap.factor
core: Rename iota to <iota> so we can have TUPLE: iota ... ; instead of TUPLE: iota...
[factor.git] / extra / benchmark / wrap / wrap.factor
index 7bd8d0335f93775ef859d71579b7618fc020bfd0..ca8f1b215ff66e1e46e1459aaecde71478031161 100644 (file)
@@ -4,7 +4,7 @@ USING: kernel math math.parser sequences wrap wrap.strings ;
 IN: benchmark.wrap
 
 : wrap-benchmark ( -- )
-    1,000 iota [ number>string ] map " " join
+    1,000 <iota> [ number>string ] map " " join
     100 [ dup 80 wrap-string drop ] times drop ;
 
 MAIN: wrap-benchmark