From cd80dfe667dc0cefd34e44197d123c7543e78166 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@slava-pestovs-macbook-pro.local>
Date: Fri, 15 Jan 2010 06:21:56 +1300
Subject: [PATCH] maze: update for iota

---
 extra/maze/maze.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/extra/maze/maze.factor b/extra/maze/maze.factor
index c0623d96b6..4238dab168 100644
--- a/extra/maze/maze.factor
+++ b/extra/maze/maze.factor
@@ -44,7 +44,7 @@ SYMBOL: visited
     line-width 2 - glLineWidth
     line-width 2 - glPointSize
     1.0 1.0 1.0 1.0 glColor4d
-    dup [ drop t <array> ] with map visited set
+    dup iota [ drop t <array> ] with map visited set
     GL_LINE_STRIP glBegin
     { 0 0 } dup vertex (draw-maze)
     glEnd ;