]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/html/parser/analyzer/analyzer.factor
core: Rename iota to <iota> so we can have TUPLE: iota ... ; instead of TUPLE: iota...
[factor.git] / extra / html / parser / analyzer / analyzer.factor
index 9a2653152597739aabd93710fdfa5a37531c0d55..b564b9009ba1c0baa7b3623184d98c9eb71bad09 100644 (file)
@@ -21,7 +21,7 @@ IN: html.parser.analyzer
    [ <enum> >alist ] [ '[ second @ ] ] bi* filter ; inline
 
 : loopn-index ( n quot -- )
-    [ iota ] [ '[ @ not ] ] bi* find 2drop ; inline
+    [ <iota> ] [ '[ @ not ] ] bi* find 2drop ; inline
 
 : loopn ( n quot -- )
     [ drop ] prepose loopn-index ; inline