Function: cl--generic-method-files

cl--generic-method-files is a byte-compiled function defined in cl-generic.el.gz.

Signature

(cl--generic-method-files METHOD)

Documentation

Return a list of files where METHOD is defined by cl-defmethod.

The list will have entries of the form (FILE . (METHOD ...)) where (METHOD ...) contains the qualifiers and specializers of the method and is a suitable argument for find-function-search-for-symbol. Filenames are absolute.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/cl-generic.el.gz
(defun cl--generic-method-files (method)
  "Return a list of files where METHOD is defined by `cl-defmethod'.
The list will have entries of the form (FILE . (METHOD ...))
where (METHOD ...) contains the qualifiers and specializers of
the method and is a suitable argument for
`find-function-search-for-symbol'.  Filenames are absolute."
  (let (result)
    (pcase-dolist (`(,file . ,defs) load-history)
      (dolist (def defs)
        (when (and (eq (car-safe def) 'cl-defmethod)
                   (eq (cadr def) method))
          (push (cons file (cdr def)) result))))
    result))