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

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

diff --git a/extra/project-euler/027/027.factor b/extra/project-euler/027/027.factor
index cd2620bc4f7d30dc2185c08ce9fd6f02db678ecf..6dda6a502b927f7ee1cf3aba2bb3586332313d6b 100644 (file)
--- a/extra/project-euler/027/027.factor
+++ b/extra/project-euler/027/027.factor
@@ -46,7 +46,7 @@ IN: project-euler.027
 <PRIVATE
 
 : source-027 ( -- seq )
-    1000 iota [ prime? ] filter [ dup [ neg ] map append ] keep
+    1000 <iota> [ prime? ] filter [ dup [ neg ] map append ] keep
     cartesian-product concat [ first2 < ] filter ;
 
 : quadratic ( b a n -- m )