I must have gotten that name from an old source of information.
;;; Packages.
(defpackage #:mdw.mop
;;; Packages.
(defpackage #:mdw.mop
- (:use #:common-lisp #:mdw.base #+cmu #:pcl)
+ (:use #:common-lisp #:mdw.base #+cmu #:mop)
(:export #:compatible-class
#:copy-instance #:copy-instance-using-class
#:initargs-for-effective-slot #:make-effective-slot
(:export #:compatible-class
#:copy-instance #:copy-instance-using-class
#:initargs-for-effective-slot #:make-effective-slot