mirror of https://github.com/rusefi/bldc.git
9 lines
102 B
Common Lisp
9 lines
102 B
Common Lisp
|
|
||
|
|
(defun f (x) {
|
||
|
|
(var a 10)
|
||
|
|
(setq a 100)
|
||
|
|
(+ x a)
|
||
|
|
})
|
||
|
|
|
||
|
|
(check (= (f 1) 101))
|