Don't forget a (:use) in defpackage to not let non-portable defaults creep in.

diff --git a/base/packages.lisp b/base/packages.lisp
index 01c4a0c..1a70c37 100644 (file)
--- a/base/packages.lisp
+++ b/base/packages.lisp
@@ -103,9 +103,8 @@
       (loop :for (kw . ()) :in clauses
         :when (member kw '(:import-from :shadowing-import-from)) :do
         (map () #'ensure-imported (cddr clauses)))
-      `(defpackage ,package
+      `(defpackage ,package (:use)
          ,@(loop :for p :in mixed-packages
              :collect `(:import-from ,p ,@(import-from p)))
          ,@clauses
-         (:export ,@(loop :for s :being :the :hash-keys :of h :collect s))))))
-)
+         (:export ,@(loop :for s :being :the :hash-keys :of h :collect s)))))))