- (:use #:common-lisp #:mdw.base #+(or cmu clisp) #:mop #+ecl #:clos)
- (:export #:copy-instance #:copy-instance-using-class
- #:with-slot-variables
- #:compatible-class
- #:initargs-for-effective-slot #:make-effective-slot
- #:filtered-slot-class-mixin
- #:filtered-direct-slot-definition
- #:filtered-effective-slot-definition
- #:predicate-class-mixin
- #:abstract-class-mixin #:instantiate-abstract-class
- #:singleton-class-mixin
- #:mdw-class #:abstract-class #:singleton-class
- #:print-object-with-slots))