After some further testing I got it working. Looks like some files was not recompiled.
Johannes Groedem wrote:
- Johannes Groedem johs@netfonds.no:
When I inspect the object from lispworks it works
It appears to be Lispworks-specific, by the way. (Yes, I got the same error, but not with CLISP or SBCL.)
I'm not entirely sure that this is the proper fix, but if anyone wants to take a look, here's a patch that fixes it. (WFM, anyway...)
Index: swank-lispworks.lisp
RCS file: /project/slime/cvsroot/slime/swank-lispworks.lisp,v retrieving revision 1.92 diff -u -r1.92 swank-lispworks.lisp --- swank-lispworks.lisp 23 Aug 2007 19:03:37 -0000 1.92 +++ swank-lispworks.lisp 17 Sep 2007 13:32:35 -0000 @@ -17,7 +17,9 @@ (import-swank-mop-symbols :clos '(:slot-definition-documentation :eql-specializer :eql-specializer-object
:compute-applicable-methods-using-classes))
:compute-applicable-methods-using-classes:slot-boundp-using-class:slot-value-using-class))(defun swank-mop:slot-definition-documentation (slot) (documentation slot t)) @@ -25,6 +27,12 @@ (defun swank-mop:compute-applicable-methods-using-classes (gf classes) (clos::compute-applicable-methods-from-classes gf classes))
+(defun swank-mop:slot-boundp-using-class (class object slotd)
- (clos::slot-boundp-using-class class object (clos:slot-definition-name slotd)))
+(defun swank-mop:slot-value-using-class (class object slotd)
- (clos::slot-value-using-class class object (clos:slot-definition-name slotd)))
;; lispworks doesn't have the eql-specializer class, it represents ;; them as a list of `(EQL ,OBJECT) (deftype swank-mop:eql-specializer () 'cons)
slime-devel site list slime-devel@common-lisp.net http://common-lisp.net/mailman/listinfo/slime-devel
