假设我有一个名为board的类:
根据这本书籍,我可以定义一个自定义的setf来阻止器的操作:
然而,Steel Bank Common Lisp会说函数未定义,即使我已经评估了它。有人知道这里出了什么问题吗?
(defclass board ()
((blocker :accessor blocker :initarg :blocker :initform 0))
根据这本书籍,我可以定义一个自定义的setf来阻止器的操作:
(defmethod (setf blocker) (new-blocker (b board))
(setf (slot-value b 'blocker) new-blocker))
然而,Steel Bank Common Lisp会说函数未定义,即使我已经评估了它。有人知道这里出了什么问题吗?