(load "compiler.scm")

(compile-program '(let ((x 3) (y 4)) (+ x y)))