logo标签列表

通用Lisp中的匿名方法

methodscommon-lispclosmopgeneric-function
3
我想将一个通用函数保存为变量:
(defvar *gf* (make-instance 'standard-generic-function)

但是当添加一个方法时，我必须自己定义call-next-method和next-method-p：

(add-method *gf*
            (make-instane 'standard-method
                          :function (lambda (args next-methods)
                                      (flet ((call-next-method () ...)
                                             (next-method-p () ...))
                                        (apply (lambda () ...) args)))))

我该如何调用一个方法来定义call-next-method？有更简单的方式吗？

1个回答
2
网页内容由stack overflow 提供, 点击上面的
可以查看英文原文，
原文链接