--- Test --- A simple lexical closure. | script | lisp interpreter fixture | | show | evaluate text | (defun adder-x (x) (lambda (y) (+ x y))) | | show | evaluate text | (setf adder-20 (adder-x 20)) | | check | evaluate text | (funcall adder-20 2) | 22 |