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

[factor.git] / extra / snake-game / game / game.factor

diff --git a/extra/snake-game/game/game.factor b/extra/snake-game/game/game.factor
index f8f01b89ae1bdddbd80bcac9b1930407cfe64928..70fdd9597c17dc8b9cf8ac12023ff1b78d56c9e6 100644 (file)
--- a/extra/snake-game/game/game.factor
+++ b/extra/snake-game/game/game.factor
@@ -49,7 +49,7 @@ C: <snake-part> snake-part
     opposite-dir prefix [ >>dir ] 2map ;
 
 : all-indices ( -- points )
-    snake-game-dim first2 * iota ;
+    snake-game-dim first2 * <iota> ;
 
 : snake-occupied-locs ( snake head-loc -- points )
     [ dir>> relative-loc ] accumulate nip ;