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

[factor.git] / extra / rosetta-code / long-multiplication / long-multiplication.factor

diff --git a/extra/rosetta-code/long-multiplication/long-multiplication.factor b/extra/rosetta-code/long-multiplication/long-multiplication.factor
index 2b3c752f54bd152cf60aaa3cbd2e2c8801e10932..e9d313f2ddfb56bd454ca4a0e99655ad8a13813f 100644 (file)
--- a/extra/rosetta-code/long-multiplication/long-multiplication.factor
+++ b/extra/rosetta-code/long-multiplication/long-multiplication.factor
@@ -19,7 +19,7 @@ IN: rosetta-code.long-multiplication
 
 : longmult-seq ( xs ys -- zs )
     [ * ] cartesian-map
-    dup length iota [ 0 <repetition> ] map
+    dup length <iota> [ 0 <repetition> ] map
     [ prepend ] 2map
     [ ] [ [ 0 suffix ] dip v+ ] map-reduce ;