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

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

diff --git a/extra/project-euler/164/164.factor b/extra/project-euler/164/164.factor
index be5d40df9b92aefd9405ab47c8fa0e6a1f5003bd..6b881cb5689bb22499dcfa2b5f864c2a4cf14d03 100644 (file)
--- a/extra/project-euler/164/164.factor
+++ b/extra/project-euler/164/164.factor
@@ -18,7 +18,7 @@ IN: project-euler.164
 <PRIVATE
 
 : next-keys ( key -- keys )
-    [ last ] [ 10 swap sum - iota ] bi [ 2array ] with map ;
+    [ last ] [ 10 swap sum - <iota> ] bi [ 2array ] with map ;
 
 : next-table ( assoc -- assoc )
     H{ } clone swap