diff options
Diffstat (limited to 'tests/lambda.lisp')
| -rw-r--r-- | tests/lambda.lisp | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/lambda.lisp b/tests/lambda.lisp index 18bbd8b..0a1ad1c 100644 --- a/tests/lambda.lisp +++ b/tests/lambda.lisp @@ -24,3 +24,10 @@ (assert (= 1 (funcall c))) (assert (= 2 (funcall c))) (assert (= 3 (funcall c)))) + +(let ((x 1) + (fn nil)) + (setq fn + (lambda (x) (setq x 2))) + (funcall fn x) + (assert (= x 1))) |