bldc/tests/test_setq_2.lisp

9 lines
68 B
Common Lisp

(define a 10)
(let ((a 100))
(setq a 43000))
(check (= a 10))