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

[factor.git] / extra / classes / struct / vectored / vectored.factor

diff --git a/extra/classes/struct/vectored/vectored.factor b/extra/classes/struct/vectored/vectored.factor
index 53f9fce988a5e0e18fd6a07027d9e19d9ad65142..cc5b53495d36d93758e7cbbabbc4d056c91f6bc9 100644 (file)
--- a/extra/classes/struct/vectored/vectored.factor
+++ b/extra/classes/struct/vectored/vectored.factor
@@ -108,7 +108,7 @@ M: vectored-T struct-transpose
     [ vectored-element> ] T-array new map-as ; inline
 
 M: T-array struct-transpose
-    dup length [ nip iota ] [ drop ] [ nip (vectored-T) ] 2tri
+    dup length [ nip <iota> ] [ drop ] [ nip (vectored-T) ] 2tri
     [ [ [ nth ] [ set-nth ] bi-curry* bi ] 2curry each ] keep ; inline
 
 ;FUNCTOR