bldc/tests/test_progn_var_3.lisp

10 lines
87 B
Common Lisp

(defun f ()
(progn
(var a 10)
(var b 20)
(+ a b)))
(check (= (f) 30))