From 56a85b5111751f5947579b5ee5cc92bdebb799c4 Mon Sep 17 00:00:00 2001 From: Teddy Date: Thu, 8 Aug 2013 00:11:39 +0800 Subject: added more list-specific procs --- robust_test.scm | 13 +++++++++++++ 1 file changed, 13 insertions(+) (limited to 'robust_test.scm') diff --git a/robust_test.scm b/robust_test.scm index 08976a0..637d9cd 100644 --- a/robust_test.scm +++ b/robust_test.scm @@ -129,6 +129,19 @@ t (list . 0) (list 0 . 0) +(length) +(length 1 2) +(length '( 1 . 2)) +(length '()) +(length '( 1 2 3 )) + +(append) +(append '()) +(append '(1 2) 3) +(append '(1 2) '(3 4) 5) +(append '(1 2) 3 '(1)) +(append '() '() '() '(1 2) 3) + (display) (display 1 2) (display . 0) -- cgit v1.2.3