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

[factor.git] / extra / ui / gadgets / charts / demos / demos.factor

diff --git a/extra/ui/gadgets/charts/demos/demos.factor b/extra/ui/gadgets/charts/demos/demos.factor
index 96546edc4a07425997b2261d0a2e56f0dedac0bf..cb4529fd07c45b041daa6de3df676cca578edba6 100644 (file)
--- a/extra/ui/gadgets/charts/demos/demos.factor
+++ b/extra/ui/gadgets/charts/demos/demos.factor
@@ -9,12 +9,12 @@ IN: ui.gadgets.charts.demos
 CONSTANT: -pi $[ pi neg ]
 
 : sine-wave ( steps -- seq )
-    [ iota ] keep
+    [ <iota> ] keep
     pi 2 * swap / [ * pi - dup sin 2array ] curry map
     ${ pi $[ pi sin ] } suffix ;
 
 : cosine-wave ( steps -- seq )
-    [ iota ] keep
+    [ <iota> ] keep
     pi 2 * swap / [ * pi - dup cos 2array ] curry map
     ${ pi $[ pi cos ] } suffix ;