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