Method: (EFFECTIVE-SLOT-DEFINITION-CLASS PERSISTENT-CLASS)

Source

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