问我如何取消一个合格的方法的实习生？

EN

您可以使用标准函数find-method和remove-method来完成此操作：

(remove-method (find-method #'frob '(:before) '(vehicle t)))

我发现使用粘液检查器要容易得多。如果您的函数名为frob，则可以使用M-x slime-inspect #'frob RET查看frob上所有方法的列表，并选择要删除的单个方法。

请看来自Xach的答案。

方法被收集在泛型函数中。UNINTERN与此无关。您想要的是从泛型函数中删除一个方法。

大多数常见的Lisp IDE都有这样的方法。或者通过编辑器(M-x未定义...)或者通过某个检查器工具。

使用AllegroCL 9.0。Xach的回答对我来说并不完全有效。

我的方法的定义如下：

defmethod my-method* ((expr forall-expr) bindings)

forall-expr是一个类，而绑定是非类型化的。要找到我必须使用的方法：

(find-method #'my-method* '() (mapcar #'find-class '(forall-expr t)))

然后删除我使用的方法的定义：

(remove-method #'my-method* (find-method #'my-method* '() (mapcar #'find-class '(forall-expr t))))

我能够从http://www.gigamonkeys.com/book/object-reorientation-classes.html的脚注7和用于查找方法http://clhs.lisp.se/Body/f_find_m.htm的Lisp HyperSpec中的示例中找出这一点。