X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/8f3f42a31fa72452fd0e46b0a2b166422c712188..refs/heads/mdw/progfmt:/src/package.lisp

diff --git a/src/package.lisp b/src/package.lisp
index 4ae7da7..61285db 100644
--- a/src/package.lisp
+++ b/src/package.lisp
@@ -7,7 +7,7 @@
 
 ;;;----- Licensing notice ---------------------------------------------------
 ;;;
-;;; This file is part of the Sensble Object Design, an object system for C.
+;;; This file is part of the Sensible Object Design, an object system for C.
 ;;;
 ;;; SOD is free software; you can redistribute it and/or modify
 ;;; it under the terms of the GNU General Public License as published by
@@ -23,10 +23,18 @@
 ;;; along with SOD; if not, write to the Free Software Foundation,
 ;;; Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 
-(cl:defpackage #:sod
-  (:use #:common-lisp
-	#:sod-utilities
-	#:sod-parser))
+(eval-when (:compile-toplevel :load-toplevel :execute)
+  (handler-bind ((warning #'muffle-warning))
+    (cl:defpackage #:sod
+      (:use #:common-lisp
+	    #:sod-utilities
+	    #:sod-parser))
+    (cl:defpackage #:sod-user
+      (:use #:common-lisp
+	    #:sod-utilities
+	    #:optparse
+	    #:sod-parser
+	    #:sod))))
 
 (cl:in-package #:sod)