From 01b2c905872ff38d5d8291f2f8de92c2771f183f Mon Sep 17 00:00:00 2001 From: Teddy Date: Fri, 9 Aug 2013 12:41:49 +0800 Subject: removed `skip` field from Pair, use `next` to make jumps instead --- robust_test.scm | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) (limited to 'robust_test.scm') diff --git a/robust_test.scm b/robust_test.scm index 637d9cd..9f5c798 100644 --- a/robust_test.scm +++ b/robust_test.scm @@ -147,3 +147,22 @@ t (display . 0) (display 0 . 0) (display t) + +(define) +(define x) +(define 1) +(define x x) +(define x 1 2) +(define x . 1) +(define x 1 . 2) +(define ()) +(define (f)) +(define (f . ) 1) +(define () 3) + +(lambda) +(lambda ()) +(lambda 1) +(lambda () '(1 2 3)) +(lambda () 1 2 3) +(lambda #() 1) -- cgit v1.2.3