;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Apr 2000
;;;;
-;;;; $Id: package.lisp,v 1.47 2003/05/15 06:30:19 kevin Exp $
+;;;; $Id$
;;;;
;;;; This file is Copyright (c) 2000-2003 by Kevin M. Rosenberg
;;;; *************************************************************************
-(eval-when (:compile-toplevel :execute)
- (declaim (optimize (speed 2) (safety 2) (compilation-speed 0) (debug 2))))
-
-(in-package :cl-user)
+(in-package #:cl-user)
#+sbcl
(eval-when (:compile-toplevel :load-toplevel :execute)
#+kmr-cmucl-mop #:mop
#+allegro #:mop
#+lispworks #:clos
- #+scl #:clos)
+ #+scl #:clos
+ #+openmcl #:openmcl-mop)
(:export
#:package
#:hyperobject
#:hyperobject-class-user-name
#:load-all-subobjects
#:view
+ #:view-subobjects
#:fmt-comma-integer
#:processed-queued-definitions
+ #:all-subobjects
+ #:subobjects
))
(defpackage #:hyperobject-user