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

[factor.git] / basis / io / files / unique / unique.factor

diff --git a/basis/io/files/unique/unique.factor b/basis/io/files/unique/unique.factor
index 0fba9e4e1900715a6650af9e39e54a3a5f6ecae7..93ad08cc7a2b35c967e4b71bc0852a3acfbe2d69 100644 (file)
--- a/basis/io/files/unique/unique.factor
+++ b/basis/io/files/unique/unique.factor
@@ -26,7 +26,7 @@ SYMBOL: unique-retries
     unique-length get random-string ;
 
 : retry ( quot: ( -- ? ) n -- )
-    iota swap [ drop ] prepose attempt-all ; inline
+    <iota> swap [ drop ] prepose attempt-all ; inline
 
 PRIVATE>