9 lines
346 B
Plaintext
9 lines
346 B
Plaintext
|
| script | lisp interpreter fixture |
|
||
|
|
| input | (defun adderx (x) (lambda (y) (+ x y))) |
|
||
|
|
| discard output |
|
||
|
|
| input | (setf adder20 (adderx 20)) |
|
||
|
|
| discard output |
|
||
|
|
| input | (funcall adder20 2) |
|
||
|
|
| check | output |!-22
|
||
|
|
|
||
|
|
-!|
|