From: Rupert Swarbrick Date: Wed, 29 Feb 2012 16:39:30 +0000 (+0000) Subject: Add a boundp-function slot, which is required by virtual slot getter. X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/clg/commitdiff_plain/203681e230fc5783f54dabe79d765f4c4cec0351 Add a boundp-function slot, which is required by virtual slot getter. See vsc-slot-x-using-class in virtual-slots.lisp for where it's used. --- diff --git a/gffi/virtual-slots.lisp b/gffi/virtual-slots.lisp index 22a6af3..ef2208c 100644 --- a/gffi/virtual-slots.lisp +++ b/gffi/virtual-slots.lisp @@ -47,6 +47,7 @@ (defclass effective-virtual-slot-definition (standard-effective-slot-definition) #+clisp(writer-function) #+clisp(boundp-function) makunbound-function + boundp-function #+clisp(type :initarg :type :reader slot-definition-type))) (defclass direct-special-slot-definition (standard-direct-slot-definition)