common-lisp - 查找专用于给定类型的所有方法

Question

有没有办法找到专门针对给定类型的所有函数？

我设想你可以从 repl 中执行一些东西，比如 (find-all-specializing-methods 'my-class)它会返回一个方法列表，如 (mypackage1:my-method-1 my-package2:my-method-2 etc.)
我认为必须有一个简单的方法来做到这一点，因为 MOP 本身可能需要存储这样一个列表来决定调用哪些方法。

Answer 1

为了找到你可以查看slime-who-specializes并了解如何为您的设置执行此操作。

按照定义，我到这里为止(对于 SBCL):

#+#.(swank-backend::sbcl-with-xref-p)
(progn
  (defmacro defxref (name &optional fn-name)
    `(defimplementation ,name (what)
       (sanitize-xrefs   
        (mapcar #'source-location-for-xref-data
                (,(find-symbol (symbol-name (if fn-name
                                                fn-name
                                                name))
                               "SB-INTROSPECT")
                  what)))))
  (defxref who-calls)
  (defxref who-binds)
  (defxref who-sets)
  (defxref who-references)
  (defxref who-macroexpands)
  #+#.(swank-backend:with-symbol 'who-specializes-directly 'sb-introspect)
  (defxref who-specializes who-specializes-directly))

这个功能是针对不同的 Lisps 单独实现的，所以如果你需要特定的细节，你需要查看: swank-<your lisp>.lisp文件并搜索 who-specializes 的实现通用功能。