(defmethod effective-slot-definition-class ((class persistent-class) &rest initargs) (declare (ignore initargs)) (find-class 'persistent-effective-slot-definition))