1#+:GCL 2(progn 3 (eval-when (:execute :compile-toplevel :load-toplevel) 4 (proclaim '(optimize (safety 1) (debug 3))))) 5