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

[factor.git] / extra / nurbs / nurbs.factor

diff --git a/extra/nurbs/nurbs.factor b/extra/nurbs/nurbs.factor
index 1b5a636914b2fe7aef1eb2eaa2dd9db3924b49ea..cc938ff20540cd0a51b4167df7d0f312c10ead6e 100644 (file)
--- a/extra/nurbs/nurbs.factor
+++ b/extra/nurbs/nurbs.factor
@@ -31,7 +31,7 @@ TUPLE: nurbs-curve
     c1 c2 c3 c4 float-array{ } 4sequence ;
 
 : order-knot-constants ( curve order -- knot-constants )
-    2dup [ knots>> length ] dip - iota
+    2dup [ knots>> length ] dip - <iota>
     [ order-index-knot-constants ] 2with map ;
 
 : knot-constants ( curve -- knot-constants )