Function: register--get-method-type

register--get-method-type is a byte-compiled function defined in register.el.gz.

Signature

(register--get-method-type VAL GENFUN &optional OTHER-ARGS-TYPE)

Source Code

;; Defined in /usr/src/emacs/lisp/register.el.gz
(defun register--get-method-type (val genfun &optional other-args-type)
  (let* ((type (cl-type-of val))
	 (types (cl--class-allparents (cl--find-class type))))
    (while (and types (not (cl-find-method genfun nil
                                           (cons (car types) other-args-type))))
      (setq types (cdr types)))
    (car types)))