[elephant-devel] Problems installing elephant on gentoo linux/CMUCL

[Andrew Blumberg]

hey garry,

 	so i'm afraid you're going to have to upgrade to cmucl 19a.  in 
18e, the definition of pcl:direct-slot-definition-class has signature 
(class initargs) rather than (class &rest initargs).  this noncompliance 
was fixed subsequently.  i guess you could also dike out the &rest in the 
elephant source, but i suspect there are other lurking pcl problems in the 
older implementation which may cause unhappiness.

 								- andrew

On Mon, 14 Feb 2005 garry.steedman at gmail.com wrote:

> Hello all,
>
> I was wondering if anyone's managed to get elephant working on gentoo 
> linux/CMUCL? If yes, any pointers would be appreciated as I've tried the 
> ebuild and a source tarball, but without any luck (my install box has
> all the required dependencies: ASDF, UFFI, libpthreads, Berkeley 4.2 - at 
> least all the obvious ones!)
>
> I include the CMUCL backtrace below just in case anyone has any pointers...
>
> cheers,
>
> garry
>
>
>
> #<Standard-Method PCL:DIRECT-SLOT-DEFINITION-CLASS 
> (ELEPHANT:PERSISTENT-METACLASS)
>                            {480E3ACD}> to the generic function 
> #<Standard-Generic-Function PCL:DIRECT-SLOT-DEFINITION-CLASS (3)
>                                                                  {28196C51}>.
> But the method has fewer required arguments than the generic function.
>   [Condition of type KERNEL:SIMPLE-PROGRAM-ERROR]
>
> Restarts:
>  0: [CONTINUE] Return NIL from load of 
> #p"/usr/lib/common-lisp/cmucl/elephant/src/metaclasses.x86f".
>  1: [RETRY] Retry performing #<ASDF:LOAD-OP NIL {487FB1CD}> on
> #<ASDF:CL-SOURCE-FILE "metaclasses" {4874D8FD}>.
>  2: [ACCEPT] Continue, treating #<ASDF:LOAD-OP NIL {487FB1CD}> on
> #<ASDF:CL-SOURCE-FILE "metaclasses" {4874D8FD}> as having been successful.
>  3: [ABORT] Abort handling SLIME request.
>  4: [ABORT] Return to Top-Level.
>
> Backtrace:
>  0: (PCL::CHECK-METHOD-ARG-INFO #<Standard-Generic-Function 
> PCL:DIRECT-SLOT-DEFINITION-CLASS (3) {28196C51}> #S(PCL::ARG-INFO 
> :ARG-INFO-LAMBDA-LIST (PCL::CLASS PCL::INITARGS) :ARG-INFO-PRECEDENCE (0 1) 
> :ARG-INFO-METATYPES (PCL:STANDARD-INSTANCE T) :ARG-INFO-NUMBER-OPTIONAL 0 
> :ARG-INFO-KEY/REST-P NIL ...) #<Standard-Method 
> PCL:DIRECT-SLOT-DEFINITION-CLASS (ELEPHANT:PERSISTENT-METACLASS) {480E3ACD}>)
>  1: (PCL::SET-ARG-INFO #<Standard-Generic-Function 
> PCL:DIRECT-SLOT-DEFINITION-CLASS (3) {28196C51}> :NEW-METHOD 
> #<Standard-Method PCL:DIRECT-SLOT-DEFINITION-CLASS 
> (ELEPHANT:PERSISTENT-METACLASS) {480E3ACD}> :LAMBDA-LIST ...)
>  2: (PCL::REAL-ADD-METHOD #<Standard-Generic-Function 
> PCL:DIRECT-SLOT-DEFINITION-CLASS (3) {28196C51}> #<Standard-Method 
> PCL:DIRECT-SLOT-DEFINITION-CLASS (ELEPHANT:PERSISTENT-METACLASS) {480E3ACD}> 
> NIL)
>  3: (PCL::LOAD-DEFMETHOD-INTERNAL STANDARD-METHOD 
> PCL:DIRECT-SLOT-DEFINITION-CLASS NIL (ELEPHANT:PERSISTENT-METACLASS) ...)
>  4: (C::DO-CALL #<Code Object "Top-Level Form" {480E3607}> 16 17 4 ...)
>  5: (COMMON-LISP::FOP-FUNCALL-FOR-EFFECT)
>  6: (COMMON-LISP::LOAD-GROUP #<Stream for file 
> "/usr/lib/common-lisp/cmucl/elephant/src/metaclasses.x86f">)
>  7: (COMMON-LISP::FASLOAD #<Stream for file 
> "/usr/lib/common-lisp/cmucl/elephant/src/metaclasses.x86f">)
>  8: (COMMON-LISP::INTERNAL-LOAD 
> #p"/usr/lib/common-lisp/cmucl/elephant/src/metaclasses.x86f" 
> #p"/usr/lib/common-lisp/cmucl/elephant/src/metaclasses.x86f" :ERROR :BINARY)
>  9: (COMMON-LISP::INTERNAL-LOAD 
> #p"/usr/lib/common-lisp/cmucl/elephant/src/metaclasses.x86f" 
> #p"/usr/lib/common-lisp/cmucl/elephant/src/metaclasses.x86f" :ERROR NIL)
>  10: (LOAD #p"/usr/lib/common-lisp/cmucl/elephant/src/metaclasses.x86f" 
> :VERBOSE NIL :PRINT ...)
>  11: ("DEFMETHOD PERFORM (LOAD-OP CL-SOURCE-FILE)" #<#1=unused-arg> #<#1#> 
> #<ASDF:LOAD-OP NIL {487FB1CD}> #<ASDF:CL-SOURCE-FILE "metaclasses" 
> {4874D8FD}>)
>  12: ("LAMBDA (PCL::EFFECTIVE-METHOD-GENSYM-0 PCL::EFFECTIVE-METHOD-GENSYM-1 
> PCL::EFFECTIVE-METHOD-GENSYM-2)" #<#1=unused-arg> #<#1#> #<ASDF:LOAD-OP NIL 
> {487FB1CD}> #<ASDF:CL-SOURCE-FILE "metaclasses" {4874D8FD}>)
>  13: (#:G0)
>  14: (ASDF:OPERATE ASDF:LOAD-OP :ELEPHANT)
>  15: (ASDF:OPERATE 2 ASDF:LOAD-OP :ELEPHANT)[:EXTERNAL]
> _______________________________________________
> elephant-devel site list
> elephant-devel at common-lisp.net
> http://common-lisp.net/mailman/listinfo/elephant-devel
>