]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/benchmark/partial-sums/partial-sums.factor
core: Rename iota to <iota> so we can have TUPLE: iota ... ; instead of TUPLE: iota...
[factor.git] / extra / benchmark / partial-sums / partial-sums.factor
index b32ce928a27a2ab5a11a3965602069eb1f7f38d6..dc898a5be99dae9490fae5146c6d730f6b3e116e 100644 (file)
@@ -5,7 +5,7 @@ combinators hints fry sequences ;
 IN: benchmark.partial-sums
 
 ! Helper words
-: summing-integers ( n quot -- y ) [ 0.0 ] [ iota ] [ ] tri* '[ 1 + @ + ] each ; inline
+: summing-integers ( n quot -- y ) [ 0.0 ] [ <iota> ] [ ] tri* '[ 1 + @ + ] each ; inline
 : summing-floats ( n quot -- y ) '[ >float @ ] summing-integers ; inline
 : cube ( x -- y ) dup dup * * ; inline
 : -1^ ( n -- -1/1 ) 2 mod 2 * 1 - ; inline