[cl-containers-devel] error when using CMUCL

[Gary King]

Hi,

Sorry to be so delayed on this (and everything else!). Life is hectic  
right now.

In any case, I'm not sure what the error message from CMUCL means.  
One idea is that it is something to do with an interaction between  
defclass* and the CMUCL compiler (though I would think you'd get a  
forward referennced class error instead. Could you try moving the  
form to a different file? (Though this seems unlikely to help since  
there are other similar forms elsewhere).

Hmm, can you keep the form but comment out the innards? Or comment  
out one part of the innards to see what CMUCL likes and dislikes?

Let me know,

thanks,



On Nov 21, 2006, at 1:44 AM, kroegerlistas at pedrokroeger.net wrote:

>
> Hi,
>
> I get the following error when compiling cl-containers with cmucl 19d.
> It runs fine with clisp 2.41 and sbcl 0.9.18 here. Do you have an idea
> of what it could be?
>
> Best regards,
>
> Pedro Kroger
>
> Execution of a form compiled with errors:
>  (DEFMETHOD INITIALIZE-INSTANCE :AFTER ((METABANG.CL- 
> CONTAINERS::OBJECT
>                                          METABANG.CL- 
> CONTAINERS:STABLE-ASSOCIATIVE-CONTAINER)
>                                         &REST METABANG.CL- 
> CONTAINERS::ARGS
>                                         &KEY
>                                         METABANG.CL- 
> CONTAINERS::CONTAINER-TYPE
>                                         &ALLOW-OTHER-KEYS)
>    (SETF (SLOT-VALUE METABANG.CL-CONTAINERS::OBJECT
>                      'METABANG.CL-CONTAINERS:ASSOCIATIVE-CONTAINER)
>            (APPLY #'METABANG.CL-CONTAINERS:MAKE-CONTAINER
>                   METABANG.CL-CONTAINERS::CONTAINER-TYPE
>                   :TEST #1=(METABANG.CL-CONTAINERS::TEST
>                             METABANG.CL-CONTAINERS::OBJECT)
>                   METABANG.CL-CONTAINERS::ARGS)
>          (SLOT-VALUE METABANG.CL-CONTAINERS::OBJECT
>                      'METABANG.CL-CONTAINERS::NUMBERED-CONTAINER)
>            (METABANG.CL-CONTAINERS:MAKE-CONTAINER
>             METABANG.CL-CONTAINERS::CONTAINER-TYPE :TEST #1#)))
>    [Condition of type KERNEL:SIMPLE-PROGRAM-ERROR]
>
> Restarts:
>   0: [CONTINUE] Return NIL from load of #P"/home/kroger/lisp/fasl/ 
> cmu-19d (19d)-linux-x86/home/kroger/lisp/base-libs/cl-containers/ 
> dev/containers.x86f".
>   1: [RETRY] Retry performing #<ASDF:LOAD-OP NIL {588FBDCD}> on  
> #<ASDF:CL-SOURCE-FILE "containers" {5907DE2D}>.
>   2: [ACCEPT] Continue, treating #<ASDF:LOAD-OP NIL {588FBDCD}> on  
> #<ASDF:CL-SOURCE-FILE "containers" {5907DE2D}> as having been  
> successful.
>   3: [ABORT-REQUEST] Abort handling SLIME request.
>   4: [ABORT] Return to Top-Level.
>
> Backtrace:
>   0: (C::DO-CALL #<Code Object "Top-Level Form" {58B9D9EF}> 70 71  
> 57 ...)
>   1: (LISP::FOP-FUNCALL-FOR-EFFECT)
>   2: (LISP::LOAD-GROUP #<Stream for file "/home/kroger/lisp/fasl/ 
> cmu-19d (19d)-linux-x86/home/kroger/lisp/base-libs/cl-containers/ 
> dev/containers.x86f">)
>   3: (LISP::FASLOAD #<Stream for file "/home/kroger/lisp/fasl/ 
> cmu-19d (19d)-linux-x86/home/kroger/lisp/base-libs/cl-containers/ 
> dev/containers.x86f">)
>   4: (LISP::INTERNAL-LOAD #P"/home/kroger/lisp/fasl/cmu-19d (19d)- 
> linux-x86/home/kroger/lisp/base-libs/cl-containers/dev/ 
> containers.x86f" #P"/home/kroger/lisp/fasl/cmu-19d (19d)-linux-x86/ 
> home/kroger/lisp/base-libs/cl-containers/dev/ 
> containers.x86f" :ERROR :BINARY)
>   5: (LISP::INTERNAL-LOAD #P"/home/kroger/lisp/fasl/cmu-19d (19d)- 
> linux-x86/home/kroger/lisp/base-libs/cl-containers/dev/ 
> containers.x86f" #P"/home/kroger/lisp/fasl/cmu-19d (19d)-linux-x86/ 
> home/kroger/lisp/base-libs/cl-containers/dev/ 
> containers.x86f" :ERROR NIL)
>   6: (LOAD #P"/home/kroger/lisp/fasl/cmu-19d (19d)-linux-x86/home/ 
> kroger/lisp/base-libs/cl-containers/dev/containers.x86f" :VERBOSE  
> NIL :PRINT ...)
>   7: ((PCL:FAST-METHOD ASDF:PERFORM (ASDF:LOAD-OP ASDF:CL-SOURCE- 
> FILE)) (#() . #(#)) #<unused-arg> #<ASDF:LOAD-OP NIL {588FBDCD}>  
> #<ASDF:CL-SOURCE-FILE "containers" {5907DE2D}>)
>   8: ("LAMBDA (G1633 G1634 G1635)" #<#1=unused-arg> #<#1#>  
> #<ASDF:LOAD-OP NIL {588FBDCD}> #<ASDF:CL-SOURCE-FILE  
> "containers" {5907DE2D}>)
>
> _______________________________________________
> cl-containers-devel mailing list
> cl-containers-devel at common-lisp.net
> http://common-lisp.net/cgi-bin/mailman/listinfo/cl-containers-devel

--
Gary Warren King, metabang.com
Cell: (413) 885 9127
Fax: (206) 338-4052
gwkkwg on Skype * garethsan on AIM