(defgeneric (setf class-name) (new-value class))
(defgeneric (setf class-slots) (new-value slot-class))
(defgeneric (setf generic-function-method-class) (new-value
(defgeneric (setf class-name) (new-value class))
(defgeneric (setf class-slots) (new-value slot-class))
(defgeneric (setf generic-function-method-class) (new-value