1 ;; Do not alter this file unless you edit test-driver.lisp to match
2 (declaim (optimize (debug 3)))
5 (defun one (a b c) (+ a b c))
8 (defmethod two ((a number) b)
11 (defstruct three four five)
13 (with-compilation-unit (:source-plist (list :test-inner "IN"))
14 (eval '(defun four () 4)))