]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/benchmark/fannkuch/fannkuch.factor
core: Rename iota to <iota> so we can have TUPLE: iota ... ; instead of TUPLE: iota...
[factor.git] / extra / benchmark / fannkuch / fannkuch.factor
index a81990aa3b22f03047d6ff42c9a1d11e80e67da8..d07824e7967d5c7ecf15abf79ec37440cea0d311 100644 (file)
@@ -24,7 +24,7 @@ IN: benchmark.fannkuch
 
 : fannkuch ( n -- )
     [
-        [ 0 0 ] dip iota [ 1 + ] B{ } map-as
+        [ 0 0 ] dip <iota> [ 1 + ] B{ } map-as
         [ fannkuch-step ] each-permutation nip
     ] keep
     "Pfannkuchen(" write pprint ") = " write . ;