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

[factor.git] / core / io / encodings / utf16 / utf16.factor

diff --git a/core/io/encodings/utf16/utf16.factor b/core/io/encodings/utf16/utf16.factor
index b18db487b2829041f62a5e4018e75629ffb08a14..bce99cbcca734a89843f6a475ee64fba50720ea8 100644 (file)
--- a/core/io/encodings/utf16/utf16.factor
+++ b/core/io/encodings/utf16/utf16.factor
@@ -106,7 +106,7 @@ M: utf16le encode-char ( char stream encoding -- )
     set-nth-unsafe ; inline
 
 : ascii-string>utf16-byte-array ( off string -- byte-array )
-    [ length >fixnum [ iota ] [ 2 fixnum*fast <byte-array> ] bi ] keep
+    [ length >fixnum [ <iota> ] [ 2 fixnum*fast <byte-array> ] bi ] keep
     [ [ ascii-char>utf16-byte-array ] 2curry with each ] 2keep drop ; inline
 
 : ascii-string>utf16le ( string stream -- )