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

[factor.git] / extra / compiler / cfg / gvn / expressions / expressions.factor

diff --git a/extra/compiler/cfg/gvn/expressions/expressions.factor b/extra/compiler/cfg/gvn/expressions/expressions.factor
index e5efdfce831e2bb7417a85967c1ca3b9efff9a4e..0cb6682cd6eeed92ffea7857c3503924baa26ebd 100644 (file)
--- a/extra/compiler/cfg/gvn/expressions/expressions.factor
+++ b/extra/compiler/cfg/gvn/expressions/expressions.factor
@@ -30,7 +30,7 @@ GENERIC: >expr ( insn -- expr )
     [
         [ , [ f <array> ] % ]
         [
-            dup iota [
+            dup <iota> [
                 - 1 - , [ swap [ set-array-nth ] keep ] %
             ] with each
         ] bi