How do I do a `cl-undefmethod'?

[Eduardo Ochs]

Hi all,

look at this example:

  (cl-defstruct myab a b)

  (make-myab :a 22 :b 33)
  ;; -> #s(myab 22 33)

  (cl-prin1-to-string (make-myab :a 22 :b 33))
  ;; -> "#s(myab :a 22 :b 33)"

  (cl-defmethod cl-print-object ((object myab) stream)
    (princ (format "%S_%S" (myab-a object) (myab-b object))
           stream))

  (cl-prin1-to-string (make-myab :a 22 :b 33))
  ;; -> "22_33"

Is there an easy way to _undefine_ the `cl-defmethod' above, like a
`makunbound' for an implementation of a generic function? I've tried
to read this

  (info "(elisp)Generic Functions")

and to do some macroexpands, but I couldn't find it...

  Thanks in advance!
    Eduardo Ochs
    http://anggtwu.net/#eev
    http://anggtwu.net/emacsconf2024.html