Update compile.lisp