core: Rename iota to <iota> so we can have TUPLE: iota ... ; instead of TUPLE: iota...

[factor.git] / basis / random / sfmt / sfmt.factor

diff --git a/basis/random/sfmt/sfmt.factor b/basis/random/sfmt/sfmt.factor
index 6e9605f220709561c3c7a37d5bf8066b69ecd5b3..f4a50cde72d13d28b11423d42c16173ba6431d51 100644 (file)
--- a/basis/random/sfmt/sfmt.factor
+++ b/basis/random/sfmt/sfmt.factor
@@ -66,7 +66,7 @@ M:: sfmt generate ( sfmt -- )
     state n>> :> n
     state mask>> :> mask
 
-    n m - >fixnum iota [| i |
+    n m - >fixnum <iota> [| i |
         i array nth-unsafe
         i m + array nth-unsafe
         mask state r1>> state r2>> formula :> r
@@ -77,7 +77,7 @@ M:: sfmt generate ( sfmt -- )
     ] each
 
     ! n m - 1 + n [a,b) [
-    m 1 - iota [
+    m 1 - <iota> [
         n m - 1 + + >fixnum :> i
         i array nth-unsafe
         m n - i + array nth-unsafe