;;; MOP Testing
+;; Disable attrib class until understand changes in sbcl/cmucl
+;; using COMPUTE-SLOT-ACCESSOR-INFO and defining method
+;; for slot access of ALL-ATTRIBUTES. Does this work on Allegro/LW?
+
+#+ignore
+(progn
(eval-when (:compile-toplevel :load-toplevel :execute)
(when (find-package '#:kmr-mop)
(pushnew :kmrtest-mop cl:*features*)))
#+kmrtest-mop
(eval-when (:compile-toplevel :load-toplevel :execute)
(setq cl:*features* (delete :kmrtest-mop cl:*features*)))
+
+) ;; progn