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

[factor.git] / extra / spelling / spelling.factor

diff --git a/extra/spelling/spelling.factor b/extra/spelling/spelling.factor
index 22b6024db9569cb77544c5dcb1cfdcb032cb610d..78e5b20a310005a9dffce418a9d0a27610fd9057 100644 (file)
--- a/extra/spelling/spelling.factor
+++ b/extra/spelling/spelling.factor
@@ -9,7 +9,7 @@ IN: spelling
 CONSTANT: ALPHABET "abcdefghijklmnopqrstuvwxyz"
 
 : deletes ( word -- edits )
-    [ length iota ] keep '[ _ remove-nth ] map ;
+    [ length <iota> ] keep '[ _ remove-nth ] map ;
 
 : transposes ( word -- edits )
     [ length [1,b) ] keep '[
@@ -17,7 +17,7 @@ CONSTANT: ALPHABET "abcdefghijklmnopqrstuvwxyz"
     ] map ;
 
 : replaces ( word -- edits )
-    [ length iota ] keep '[
+    [ length <iota> ] keep '[
         ALPHABET [
             swap _ clone [ set-nth-unsafe ] keep
         ] with { } map-as