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

[factor.git] / core / io / binary / binary.factor

diff --git a/core/io/binary/binary.factor b/core/io/binary/binary.factor
index d69ddb0d779b14455a2a421b1f1f610df19e7fab..b85e9316e37b9a3ee81397f78f73a04b1a4b068c 100644 (file)
--- a/core/io/binary/binary.factor
+++ b/core/io/binary/binary.factor
@@ -18,9 +18,9 @@ IN: io.binary
 
 PRIVATE>
 
-: >le ( x n -- byte-array ) iota map-bytes ;
+: >le ( x n -- byte-array ) <iota> map-bytes ;
 
-: >be ( x n -- byte-array ) iota <reversed> map-bytes ;
+: >be ( x n -- byte-array ) <iota> <reversed> map-bytes ;
 
 : d>w/w ( d -- w1 w2 )
     [ 0xffffffff bitand ] [ -32 shift 0xffffffff bitand ] bi ;