transcendental-lisp/fitnesse/FitNesseRoot/LispInterpreter/TestOne.wiki

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
-!|