summaryrefslogtreecommitdiff
path: root/src/test
diff options
context:
space:
mode:
authorKeith Packard <keithp@keithp.com>2016-11-15 10:32:36 -0800
committerKeith Packard <keithp@keithp.com>2017-02-20 11:16:51 -0800
commit994adc7a47cbf3cbf6041eca7430273f8018de08 (patch)
treef4432e264c7c9ce0b19f94c3c09fc2016a3f6ce3 /src/test
parent41175ff82bc0e35c99c60b49aa62944a12917157 (diff)
altos/lisp: remove duplicate 'length' lambda from hanoi example
This function is now a builtin. Signed-off-by: Keith Packard <keithp@keithp.com>
Diffstat (limited to 'src/test')
-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