diff options
| author | Teddy <ted.sybil@gmail.com> | 2013-08-09 17:58:48 +0800 |
|---|---|---|
| committer | Teddy <ted.sybil@gmail.com> | 2013-08-09 17:58:48 +0800 |
| commit | f8a870c48886e8828155d05b0da6b7868344ba6a (patch) | |
| tree | c644eecb1eab55b3e08390efb179c6d6bdbab045 /robust_test.scm | |
| parent | 01b2c905872ff38d5d8291f2f8de92c2771f183f (diff) | |
added `and` operator
Diffstat (limited to 'robust_test.scm')
| -rw-r--r-- | robust_test.scm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/robust_test.scm b/robust_test.scm index 9f5c798..0e989b8 100644 --- a/robust_test.scm +++ b/robust_test.scm @@ -166,3 +166,9 @@ t (lambda () '(1 2 3)) (lambda () 1 2 3) (lambda #() 1) + +(define src + '(define g (lambda (x) (if (= x 5) 0 ((lambda () (display x) (g (+ x 1)))))))) +src +(eval src) +(eval '(g 0)) |