diff options
Diffstat (limited to 'tests/013/maze.tl')
| -rw-r--r-- | tests/013/maze.tl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/013/maze.tl b/tests/013/maze.tl index f65bc9e0..5cb989d6 100644 --- a/tests/013/maze.tl +++ b/tests/013/maze.tl @@ -13,7 +13,8 @@ (if list [list (rand (length list))])) (defun neigh (loc) - (tree-bind (x . y) loc + (let ((x (from loc)) + (y (to loc))) (list (- x 1)..y (+ x 1)..y x..(- y 1) x..(+ y 1)))) |