(defclass rudel-state ()
  ())

(defclass rudel-impersonator ()
  ())

(defclass rudel-delegator ()
  ())

(defclass rudel-obby-state (rudel-state rudel-impersonator rudel-delegator)
  ())

(defclass rudel-obby-client-connection-state (rudel-obby-state)
  ())

(defclass rudel-obby-document-handler ()
  ())

(defclass rudel-obby-client-state-subscribing
  (rudel-obby-client-connection-state rudel-obby-document-handler)
  ())

(defmethod no-applicable-method ((this rudel-delegator))
  ('dispatched-to-rudel-delegator))

(defgeneric no-methods (one-arg))

(let ((rocss (rudel-obby-client-state-subscribing "")))
  (no-methods rocss))


(class-all-parents 'rudel-obby-client-state-subscribing)