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

[factor.git] / extra / project-euler / 043 / 043.factor

diff --git a/extra/project-euler/043/043.factor b/extra/project-euler/043/043.factor
index 985c53f745dd2146dd1674f7a5582c22b0a68dcf..79f4cfce6beb1a7449710e242036b1c2b3bafbbf 100644 (file)
--- a/extra/project-euler/043/043.factor
+++ b/extra/project-euler/043/043.factor
@@ -82,7 +82,7 @@ PRIVATE>
     [ unclip 1 head prefix concat ] map [ all-unique? ] filter ;
 
 : add-missing-digit ( seq -- seq )
-    dup natural-sort 10 iota swap diff prepend ;
+    dup natural-sort 10 <iota> swap diff prepend ;
 
 : interesting-pandigitals ( -- seq )
     17 candidates { 13 11 7 5 3 2 } [