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

[factor.git] / extra / benchmark / raytracer / raytracer.factor

diff --git a/extra/benchmark/raytracer/raytracer.factor b/extra/benchmark/raytracer/raytracer.factor
index c246f1538fb6f76ec8668fb46e5cc70737747665..1252d402abfa533b866e76f138150ea34f8a1cd3 100644 (file)
--- a/extra/benchmark/raytracer/raytracer.factor
+++ b/extra/benchmark/raytracer/raytracer.factor
@@ -148,7 +148,7 @@ DEFER: create
     [ oversampling /f ] bi@ 0.0 double-array{ } 3sequence ;
 
 : ss-grid ( -- ss-grid )
-    oversampling iota [ oversampling iota [ ss-point ] with map ] map ;
+    oversampling <iota> [ oversampling iota [ ss-point ] with map ] map ;
 
 : ray-grid ( point ss-grid -- ray-grid )
     [
@@ -160,8 +160,8 @@ DEFER: create
     [ [ swap cast-ray + ] with each ] with each ;
 
 : pixel-grid ( -- grid )
-    size iota reverse [
-        size iota [
+    size <iota> reverse [
+        size <iota> [
             [ size 0.5 * - ] bi@ swap size
             double-array{ } 3sequence
         ] with map