bldc/tests/test_progn_var_0.lisp

(defun t1 ()
  (progn
    1
    (var x 10)
    2
    (var y 5)
    (+ x y)))

(check (= (t1) 15))