[closer-devel] Define-Layered-Function Error in Sbcl 1.0.29

[Seth Burleigh]

When calling (define-layered-function display-object (object)) with the
latest version of context and closer-mop

I get

 

STYLE-WARNING:

   redefining =LAYERED-FUNCTION-DEFINER-FOR-DISPLAY-OBJECT= in DEFGENERIC

Cannot CHANGE-CLASS objects into GENERIC-FUNCTION metaobjects.

   [Condition of type SB-PCL::METAOBJECT-INITIALIZATION-VIOLATION]

       0: [RETRY] Retry SLIME REPL evaluation request.

       1: [ABORT] Return to SLIME's top level.

       2: [ABORT] Abort

       3: [CLOSE-CONNECTION] Close SLIME connection

       4: [ABORT] Exit debugger, returning to top level.

 

Expanding, the problem is in this form

 

(DEFGENERIC =LAYERED-FUNCTION-DEFINER-FOR-DISPLAY-OBJECT=

             (layer-arg OBJECT)

             (:GENERIC-FUNCTION-CLASS LAYERED-FUNCTION)

             (:ARGUMENT-PRECEDENCE-ORDER OBJECT layer-arg))

 (DECLAIM (INLINE DISPLAY-OBJECT))

 

Apparently, it doesn't like the layered-function argument. Any ideas how to
fix this? I have absolutely no experience

in making new CLOS protocols.

Thx!

 

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/closer-devel/attachments/20090823/890ea6bd/attachment.html>