[elephant-devel] Problem loading latest CVS version on SBCL MacBook Intel

[Ian Eslick]

This was my error.  I was sloppy in promoting a documentation  
clarification.

This should now be fixed and all tests pass for me locally.  Let me  
know if you still have problems with the latest CVS HEAD.

Ian


On May 7, 2007, at 2:28 PM, lists at infoway.net wrote:

> I just downloaded the latest CVS version and elephant is not  
> loading properly.
>
> The error message I get is:
>
> (defun pprev-dup-hack (cur key)
>   "
> ; compiling GO
> ; compiling BACK
> ; compiling ONE
> ; compiling STEP
> ; compiling IN
> ; compiling A
> ; compiling DUPLICATE
> ; compiling SET; compilation aborted because of fatal error:
>                ;   READ failure in COMPILE-FILE:
>                ;     READER-ERROR at 19745 (line 559, column 39) on  
> #<SB-SYS:FD-STREAM for "file /Users/dev/lisp/elephant/src/elephant/ 
> collections.lisp" {1239E0D9}>:
>                ; comma not inside a backquote
>
> ; /Users/dev/lisp/elephant/src/elephant/collections.fasl written
> ; compilation finished in 0:00:00
> WARNING:
>    COMPILE-FILE warned while performing #<COMPILE-OP NIL {122FA581} 
> > on
>    #<CL-SOURCE-FILE "collections" {11C023B1}>.
>
>
> The original function in collections.lisp (line 558) looks like this:
>
> (defun pprev-dup-hack (cur key)
>   "Go back one step in a duplicate set, returns nil
>    if previous element is a different key.  More efficient than
>    the current default implementation of cursor-pprev-dup"
>   (multiple-value-bind (exists? skey value pkey)
>       (cursor-pprev cur)
>     (when (lisp-compare-equal key skey)
>       (values exists? key value pkey))))
>
>
> I changed the last line to:
>       (values exists? skey value pkey))))
>
> and it now seems to load. However, now I'm getting this after  
> running all tests:
>
> 10 out of 131 total tests failed: MAP-INDEXED-INDEX, MAP-INDEX-FROM- 
> END,
>    INDEXING-BASIC, INDEXING-RANGE, INDEXING-SLOT-MAKUNBOUND,
>    INDEXING-WIPE-INDEX, INDEXING-RECONNECT-DB, INDEXING-CHANGE-CLASS,
>    INDEXING-REDEF-CLASS, INDEXING-TIMING.
>
> Whereas before, I was not getting any test failures. Is this due to  
> the typo in collections.lisp or something else?
>
> Thanks,
> Daniel
>
> _______________________________________________
> elephant-devel site list
> elephant-devel at common-lisp.net
> http://common-lisp.net/mailman/listinfo/elephant-devel