Transpose lines.
[sbcl.git] / tests / package-test-7.lisp
blobacdcd251f44033ba9193e86be5f9dd62126f2e2b
1 (eval-when (:compile-toplevel :load-toplevel :execute)
2 (unless (find-package "COMPILE-TWICE")
3 (make-package "COMPILE-TWICE" :use '("CL"))))
5 (in-package "COMPILE-TWICE")
7 (defstruct bar-compile-twice (foo))