diff options
| author | paltherr <paltherr@epfl.ch> | 2003-07-18 09:29:13 +0000 |
|---|---|---|
| committer | paltherr <paltherr@epfl.ch> | 2003-07-18 09:29:13 +0000 |
| commit | 5a64e1706c57b41a8b4199387efd081d6aabaf08 (patch) | |
| tree | f3a8fe7cef61673060eb247f4dca4dd26fea4c88 /test/files/run/lisp.check | |
| parent | 85a93fa145aaef49d434d05903310a9e5170affa (diff) | |
| download | scala-5a64e1706c57b41a8b4199387efd081d6aabaf08.tar.gz scala-5a64e1706c57b41a8b4199387efd081d6aabaf08.tar.bz2 scala-5a64e1706c57b41a8b4199387efd081d6aabaf08.zip | |
- Merged Course-2002-11 into lisp
Diffstat (limited to 'test/files/run/lisp.check')
| -rw-r--r-- | test/files/run/lisp.check | 19 |
1 files changed, 16 insertions, 3 deletions
diff --git a/test/files/run/lisp.check b/test/files/run/lisp.check index 7a6c59ce7c..8a61dd7315 100644 --- a/test/files/run/lisp.check +++ b/test/files/run/lisp.check @@ -1,13 +1,26 @@ +(lambda (x) (+ (* x x) 1)) +(lambda (x) (+ (* x x) 1)) + +( '(1 2 3)) = (1 2 3) +(car '(1 2 3)) = 1 +(cdr '(1 2 3)) = (2 3) +(null? '(2 3)) = 0 +(null? '()) = 1 + +faculty(10) = 3628800 +faculty(10) = 3628800 +foobar = ("a" "bc" "def" "z") + List('lambda,List('x),List('+,List('*,'x,'x),1)) (lambda (x) (+ (* x x) 1)) -( '(1 2 3)) = List(1,2,3) +( '(1 2 3)) = (1 2 3) (car '(1 2 3)) = 1 -(cdr '(1 2 3)) = List(2,3) +(cdr '(1 2 3)) = (2 3) (null? '(2 3)) = 0 (null? '()) = 1 faculty(10) = 3628800 faculty(10) = 3628800 -foobar = List(a,bc,def,z) +foobar = ("a" "bc" "def" "z") |