summaryrefslogtreecommitdiff
path: root/src/test/hanoi.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/test/hanoi.lisp')
-rw-r--r--src/test/hanoi.lisp8
1 files changed, 0 insertions, 8 deletions
diff --git a/src/test/hanoi.lisp b/src/test/hanoi.lisp
index b84b8174..66a8d04b 100644
--- a/src/test/hanoi.lisp
+++ b/src/test/hanoi.lisp
@@ -62,14 +62,6 @@
)
)
-; This should probably be included in the rom image...
-
-(defun length (list)
- (cond (list (1+ (length (cdr list))))
- (0)
- )
- )
-
; Position of the top of the stack on the screen
; Shorter stacks start further down the screen