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

[factor.git] / extra / trees / splay / splay-tests.factor

diff --git a/extra/trees/splay/splay-tests.factor b/extra/trees/splay/splay-tests.factor
index db4302f5e3876d586d098072352a705166f3a570..9fbff0c6166107c4f6257f789af3ca9c7b5281bb 100644 (file)
--- a/extra/trees/splay/splay-tests.factor
+++ b/extra/trees/splay/splay-tests.factor
@@ -5,10 +5,10 @@ tools.test trees.splay ;
 IN: trees.splay.tests
 
 : randomize-numeric-splay-tree ( splay-tree -- )
-    100 iota [ drop 100 random of drop ] with each ;
+    100 <iota> [ drop 100 random of drop ] with each ;
 
 : make-numeric-splay-tree ( n -- splay-tree )
-    iota <splay> [ '[ dup _ set-at ] each ] keep ;
+    <iota> <splay> [ '[ dup _ set-at ] each ] keep ;
 
 { t } [
     100 make-numeric-splay-tree dup randomize-numeric-splay-tree
@@ -33,7 +33,7 @@ IN: trees.splay.tests
 ] unit-test
 
 { 0 } [
-    100 iota [ dup zip >splay ] keep
+    100 <iota> [ dup zip >splay ] keep
     [ over delete-at ] each assoc-size
 ] unit-test