sbcl.sbcl/tests/package-test-7.lisp
Charles Zhang ea49ebe556 Fix test case.
So that it actually exercises the deferred package machinery.
2023-02-02 13:03:52 +01:00

8 lines
213 B
Common Lisp

(eval-when (:compile-toplevel :load-toplevel :execute)
(unless (find-package "COMPILE-TWICE")
(make-package "COMPILE-TWICE" :use '("CL"))))
(in-package "COMPILE-TWICE")
(defstruct bar-compile-twice (foo))