(compile-file "clos.lisp") (load "clos") (test)