]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/benchmark/memoize/memoize.factor
core: Rename iota to <iota> so we can have TUPLE: iota ... ; instead of TUPLE: iota...
[factor.git] / extra / benchmark / memoize / memoize.factor
index 093b66ad5d58431e22ccad2dcd05f0b6c71098cb..f48e85ebae7aed918ca84a17f55e6e1084aa65ad 100644 (file)
@@ -11,7 +11,7 @@ MEMO: mem4 ( n n n n -- n ) + + + ;
 
 : memoize-benchmark ( -- )
     1000 [
-        1000 iota [
+        1000 <iota> [
             mem0 [ mem1 ] keep [ mem2 ] 2keep [ mem3 ] 3keep mem4 drop
         ] each
     ] times ;