diff options
| author | Mistivia <i@mistivia.com> | 2025-06-22 23:32:56 +0800 |
|---|---|---|
| committer | Mistivia <i@mistivia.com> | 2025-06-22 23:33:12 +0800 |
| commit | 7563e4e5c3c346b8b11f7e66cdb11c81bcf58fa9 (patch) | |
| tree | 3d3ca32fdab4e1b21dc352d0bc98d3e8bedd452f /tests/lambda.lisp | |
| parent | daf22cff78522a1b5140fb7b02be3006ea4a2236 (diff) | |
add symbol functions
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))) |