[elephant-devel] Elephant Test Suite Failed

Ian Eslick eslick at media.mit.edu
Fri Feb 12 17:29:54 UTC 2010


Sounds like an idempotence problem.  Sometimes prior runs of the test leave data in the test DB that fouls up other tests.  Are you running on a clean DB?  You can run tests/delscript.sh to ensure databases are fresh)?  Also, which lisp are you running?

Thanks,
Ian

On Feb 10, 2010, at 3:45 PM, Thomas Karolski wrote:

> Anyone knows what went wrong here?
> 
> ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------
> ELE-TESTS> (progn (loop for p in '(:elephant :ele-bdb :elephant-tests)
>                    do (asdf:oos 'asdf:load-op p))
>               (in-package :elephant-tests)
>               (setq elephant-tests::*default-spec*
> elephant-tests::*testbdb-spec*)
>               (do-backend-tests))
> Attempting to load libmemutil.so...
> Loaded /home/thomas/sources/clbuild/source/elephant/src/memutil/libmemutil.so
> Attempting to load libmemutil.so...
> Loaded /home/thomas/sources/clbuild/source/elephant/src/memutil/libmemutil.so
> Loading /usr/local/BerkeleyDB.4.7/lib/libdb-4.7.so
> Attempting to load libberkeley-db.so...
> Loaded /home/thomas/sources/clbuild/source/elephant/src/db-bdb/libberkeley-db.so
> Attempting to load libmemutil.so...
> Loaded /home/thomas/sources/clbuild/source/elephant/src/memutil/libmemutil.so
> Attempting to load libmemutil.so...
> Loaded /home/thomas/sources/clbuild/source/elephant/src/memutil/libmemutil.so
> .............................................................................................................................;
> in: LAMBDA NIL
> ;     (LET* ((ELEPHANT-TESTS::HT
> ;             (MAKE-HASH-TABLE :TEST 'EQUALP :SIZE 333 :REHASH-SIZE 1.2
> ;                              :REHASH-THRESHOLD 0.8))
> ;            (ELEPHANT-TESTS::REHASH-SIZE
> ;             (HASH-TABLE-REHASH-SIZE ELEPHANT-TESTS::HT))
> ;            (ELEPHANT-TESTS::REHASH-THRESHOLD
> ;             (HASH-TABLE-REHASH-THRESHOLD ELEPHANT-TESTS::HT))
> ;            (ELEPHANT-TESTS::OUT
> ;             (ELEPHANT-TESTS::IN-OUT-VALUE ELEPHANT-TESTS::HT)))
> ;       (ELEPHANT-TESTS::ARE-NOT-NULL
> ;        (EQ (HASH-TABLE-TEST ELEPHANT-TESTS::OUT) 'EQUALP)
> ;        (EQ (HASH-TABLE-TEST (ELEPHANT-TESTS::IN-OUT-VALUE #)) 'EQ)
> ;        (EQ (HASH-TABLE-TEST (ELEPHANT-TESTS::IN-OUT-VALUE #)) 'EQL)
> ;        (EQ (HASH-TABLE-TEST (ELEPHANT-TESTS::IN-OUT-VALUE #)) 'EQUAL)
> ;        (EQ (HASH-TABLE-TEST (ELEPHANT-TESTS::IN-OUT-VALUE #)) 'EQUALP)))
> ;
> ; caught STYLE-WARNING:
> ;   The variable REHASH-SIZE is defined but never used.
> ;
> ; caught STYLE-WARNING:
> ;   The variable REHASH-THRESHOLD is defined but never used.
> ;
> ; compilation unit finished
> ;   caught 2 STYLE-WARNING conditions
> ....................................; in: LAMBDA NIL
> ;     (LET ((#:RESULT541
> ;            (MULTIPLE-VALUE-LIST
> ;             (LET #
> ;               #))))
> ;       )
> ;
> ; caught STYLE-WARNING:
> ;   The variable #:RESULT541 is defined but never used.
> ;
> ; compilation unit finished
> ;   caught 1 STYLE-WARNING condition
> ........
> Second store spec missing: ignoring....; in: LAMBDA NIL
> ;     (ERROR)
> ;
> ; caught STYLE-WARNING:
> ;   The function was called with zero arguments, but wants at least one.
> ;
> ; compilation unit finished
> ;   caught 1 STYLE-WARNING condition
> ...................................
> Synchronizing PINEAPPLE in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing PINEAPPLE in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> ......
> STYLE-WARNING:
>  redefining SLOT-UNBOUND (#<BUILT-IN-CLASS T>
>                           #<PERSISTENT-METACLASS CLASS-ONE>
>                           #<SB-MOP:EQL-SPECIALIZER
>                             {1005C29681}>) in DEFMETHOD
> ...
> Synchronizing UPDATE-CLASS in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> ..
> Synchronizing CLASS-ONE in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> ....persistent -> indexed
> Synchronizing UISUV in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> indexed -> persistent
> Synchronizing UISUV in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> .persistent -> indexed
> indexed -> indexed
> indexed -> persistent
> ................................................................................................................................................................
> ;     (SETQ ELEPHANT-TESTS::RV
> ;             (EQUAL (FORMAT NIL "~A" ELEPHANT-TESTS::KEY)
> ;                    (FORMAT NIL "~A"
> ;                            (ELEPHANT:GET-FROM-ROOT ELEPHANT-TESTS::KEY))))
> ;
> ; caught WARNING:
> ;   undefined variable: RV
> ;
> ; compilation unit finished
> ;   Undefined variable:
> ;     RV
> ;   caught 1 WARNING condition
> Testing length = 163840
> ....................................; in: LAMBDA NIL
> ;     (MULTIPLE-VALUE-BIND
> ;         (ELEPHANT-TESTS::HAS ELEPHANT-TESTS::K ELEPHANT-TESTS::V)
> ;         (ELEPHANT:CURSOR-FIRST ELEPHANT-TESTS::CUR)
> ;       (WHEN ELEPHANT-TESTS::HAS (PUSH ELEPHANT-TESTS::V
> ELEPHANT-TESTS::RESULTS)))
> ; --> MULTIPLE-VALUE-CALL
> ; ==>
> ;   #'(LAMBDA
> ;         (&OPTIONAL (ELEPHANT-TESTS::HAS) (ELEPHANT-TESTS::K)
> ;          (ELEPHANT-TESTS::V)
> ;          &REST #:G51)
> ;       (DECLARE (IGNORE #:G51))
> ;       (WHEN ELEPHANT-TESTS::HAS
> ;         (PUSH ELEPHANT-TESTS::V ELEPHANT-TESTS::RESULTS)))
> ;
> ; caught STYLE-WARNING:
> ;   The variable K is defined but never used.
> 
> ;     (MULTIPLE-VALUE-BIND
> ;         (ELEPHANT-TESTS::HAS ELEPHANT-TESTS::K ELEPHANT-TESTS::V)
> ;         (ELEPHANT:CURSOR-NEXT ELEPHANT-TESTS::CUR)
> ;       (WHEN ELEPHANT-TESTS::HAS (PUSH ELEPHANT-TESTS::V
> ELEPHANT-TESTS::RESULTS)))
> ; --> MULTIPLE-VALUE-CALL
> ; ==>
> ;   #'(LAMBDA
> ;         (&OPTIONAL (ELEPHANT-TESTS::HAS) (ELEPHANT-TESTS::K)
> ;          (ELEPHANT-TESTS::V)
> ;          &REST #:G56)
> ;       (DECLARE (IGNORE #:G56))
> ;       (WHEN ELEPHANT-TESTS::HAS
> ;         (PUSH ELEPHANT-TESTS::V ELEPHANT-TESTS::RESULTS)))
> ;
> ; caught STYLE-WARNING:
> ;   The variable K is defined but never used.
> 
> ; ==>
> ;   #'(LAMBDA
> ;         (&OPTIONAL (ELEPHANT-TESTS::HAS) (ELEPHANT-TESTS::K)
> ;          (ELEPHANT-TESTS::V)
> ;          &REST #:G61)
> ;       (DECLARE (IGNORE #:G61))
> ;       (WHEN ELEPHANT-TESTS::HAS
> ;         (PUSH ELEPHANT-TESTS::V ELEPHANT-TESTS::RESULTS)))
> ;
> ; caught STYLE-WARNING:
> ;   The variable K is defined but never used.
> 
> ; ==>
> ;   #'(LAMBDA
> ;         (&OPTIONAL (ELEPHANT-TESTS::HAS) (ELEPHANT-TESTS::K)
> ;          (ELEPHANT-TESTS::V)
> ;          &REST #:G66)
> ;       (DECLARE (IGNORE #:G66))
> ;       (WHEN ELEPHANT-TESTS::HAS
> ;         (PUSH ELEPHANT-TESTS::V ELEPHANT-TESTS::RESULTS)))
> ;
> ; caught STYLE-WARNING:
> ;   The variable K is defined but never used.
> 
> ;
> ; note: cannot stack allocate value cell for CUR
> ;
> ; compilation unit finished
> ;   caught 4 STYLE-WARNING conditions
> ;   printed 1 note
> ....; in: LAMBDA NIL
> ;     (MULTIPLE-VALUE-BIND
> ;         (ELEPHANT-TESTS::HAS ELEPHANT-TESTS::K ELEPHANT-TESTS::V)
> ;         (ELEPHANT:CURSOR-CURRENT ELEPHANT-TESTS::CUR)
> ;       (IT.BESE.FIVEAM:IS-TRUE
> ;        (AND ELEPHANT-TESTS::HAS
> ;             (= (ELEPHANT-TESTS::SLOT1 ELEPHANT-TESTS::V) 100))))
> ; --> MULTIPLE-VALUE-CALL
> ; ==>
> ;   #'(LAMBDA
> ;         (&OPTIONAL (ELEPHANT-TESTS::HAS) (ELEPHANT-TESTS::K)
> ;          (ELEPHANT-TESTS::V)
> ;          &REST #:G45)
> ;       (DECLARE (IGNORE #:G45))
> ;       (IT.BESE.FIVEAM:IS-TRUE
> ;        (AND ELEPHANT-TESTS::HAS
> ;             (= (ELEPHANT-TESTS::SLOT1 ELEPHANT-TESTS::V) 100))))
> ;
> ; caught STYLE-WARNING:
> ;   The variable K is defined but never used.
> 
> ;     (MULTIPLE-VALUE-BIND
> ;         (ELEPHANT-TESTS::HAS ELEPHANT-TESTS::K ELEPHANT-TESTS::V)
> ;         (ELEPHANT:CURSOR-PREV ELEPHANT-TESTS::CUR)
> ;       (IT.BESE.FIVEAM:IS-TRUE
> ;        (AND ELEPHANT-TESTS::HAS
> ;             (= (ELEPHANT-TESTS::SLOT1 ELEPHANT-TESTS::V) 100))))
> ; --> MULTIPLE-VALUE-CALL
> ; ==>
> ;   #'(LAMBDA
> ;         (&OPTIONAL (ELEPHANT-TESTS::HAS) (ELEPHANT-TESTS::K)
> ;          (ELEPHANT-TESTS::V)
> ;          &REST #:G65)
> ;       (DECLARE (IGNORE #:G65))
> ;       (IT.BESE.FIVEAM:IS-TRUE
> ;        (AND ELEPHANT-TESTS::HAS
> ;             (= (ELEPHANT-TESTS::SLOT1 ELEPHANT-TESTS::V) 100))))
> ;
> ; caught STYLE-WARNING:
> ;   The variable K is defined but never used.
> 
> ;
> ; note: cannot stack allocate value cell for CUR
> ;
> ; compilation unit finished
> ;   caught 2 STYLE-WARNING conditions
> ;   printed 1 note
> ..........; in: LAMBDA NIL
> ;     (LET ((#:RESULT189
> ;            (MULTIPLE-VALUE-LIST
> ;             (IT.BESE.FIVEAM:FINISHES
> ;               #))))
> ;       )
> ;
> ; caught STYLE-WARNING:
> ;   The variable #:RESULT189 is defined but never used.
> ;
> ; compilation unit finished
> ;   caught 1 STYLE-WARNING condition
> ..................
> ;
> ; note: cannot stack allocate value cell for C
> ;
> ; compilation unit finished
> ;   printed 1 note
> .
> ;
> ; note: cannot stack allocate value cell for C
> ;
> ; compilation unit finished
> ;   printed 1 note
> .
> ;
> ; note: cannot stack allocate value cell for C
> ;
> ; compilation unit finished
> ;   printed 1 note
> .
> ;
> ; note: cannot stack allocate value cell for C
> ;
> ; compilation unit finished
> ;   printed 1 note
> .
> ;
> ; note: cannot stack allocate value cell for C
> ;
> ; compilation unit finished
> ;   printed 1 note
> .
> ;
> ; note: cannot stack allocate value cell for C
> ;
> ; compilation unit finished
> ;   printed 1 note
> .
> ;
> ; note: cannot stack allocate value cell for C
> ;
> ; compilation unit finished
> ;   printed 1 note
> .
> ;
> ; note: cannot stack allocate value cell for C
> ;
> ; compilation unit finished
> ;   printed 1 note
> ....; in: LAMBDA NIL
> ;     (FLET ((ELEPHANT-TESTS::RETURNER
> ;                (ELEPHANT-TESTS::KEY ELEPHANT-TESTS::VALUE
> ELEPHANT-TESTS::PKEY)
> ;              (ELEPHANT-TESTS::SLOT1 ELEPHANT-TESTS::VALUE)))
> ;       (IT.BESE.FIVEAM:IS
> ;        (EQUAL
> ;         (ELEPHANT:MAP-INDEX #'ELEPHANT-TESTS::RETURNER ELEPHANT-TESTS::INDEX1
> ;                             :VALUE 990 :COLLECT T)
> ;         (LIST 990))))
> ;
> ; caught STYLE-WARNING:
> ;   The variable KEY is defined but never used.
> ;
> ; caught STYLE-WARNING:
> ;   The variable PKEY is defined but never used.
> ;
> ; compilation unit finished
> ;   caught 2 STYLE-WARNING conditions
> ...............; in: LAMBDA NIL
> ;     (MULTIPLE-VALUE-BIND
> ;         (ELEPHANT-TESTS::HAS ELEPHANT-TESTS::KEY ELEPHANT-TESTS::VALUE)
> ;         (ELEPHANT:CURSOR-NEXT ELEPHANT-TESTS::C)
> ;       ELEPHANT-TESTS::VALUE)
> ; --> MULTIPLE-VALUE-CALL
> ; ==>
> ;   #'(LAMBDA
> ;         (&OPTIONAL (ELEPHANT-TESTS::HAS) (ELEPHANT-TESTS::KEY)
> ;          (ELEPHANT-TESTS::VALUE)
> ;          &REST #:G115)
> ;       (DECLARE (IGNORE #:G115))
> ;       ELEPHANT-TESTS::VALUE)
> ;
> ; caught STYLE-WARNING:
> ;   The variable HAS is defined but never used.
> ;
> ; caught STYLE-WARNING:
> ;   The variable KEY is defined but never used.
> 
> ; ==>
> ;   #'(LAMBDA
> ;         (&OPTIONAL (ELEPHANT-TESTS::HAS) (ELEPHANT-TESTS::KEY)
> ;          (ELEPHANT-TESTS::VALUE)
> ;          &REST #:G111)
> ;       (DECLARE (IGNORE #:G111))
> ;       ELEPHANT-TESTS::VALUE)
> ;
> ; caught STYLE-WARNING:
> ;   The variable HAS is defined but never used.
> ;
> ; caught STYLE-WARNING:
> ;   The variable KEY is defined but never used.
> 
> ;     (MULTIPLE-VALUE-BIND
> ;         (ELEPHANT-TESTS::HAS ELEPHANT-TESTS::KEY ELEPHANT-TESTS::VALUE)
> ;         (ELEPHANT:CURSOR-NEXT ELEPHANT-TESTS::C))
> ; --> MULTIPLE-VALUE-CALL
> ; ==>
> ;   #'(LAMBDA
> ;         (&OPTIONAL (ELEPHANT-TESTS::HAS) (ELEPHANT-TESTS::KEY)
> ;          (ELEPHANT-TESTS::VALUE)
> ;          &REST #:G62)
> ;       (DECLARE (IGNORE #:G62)))
> ;
> ; caught STYLE-WARNING:
> ;   The variable HAS is defined but never used.
> ;
> ; caught STYLE-WARNING:
> ;   The variable KEY is defined but never used.
> ;
> ; caught STYLE-WARNING:
> ;   The variable VALUE is defined but never used.
> 
> ;
> ; note: cannot stack allocate value cell for C
> 
> ;
> ; note: cannot stack allocate value cell for C
> ;
> ; compilation unit finished
> ;   caught 7 STYLE-WARNING conditions
> ;   printed 2 notes
> ......; in: LAMBDA NIL
> ;     (MULTIPLE-VALUE-BIND (ELEPHANT-TESTS::BOOL ELEPHANT-TESTS::RES)
> ;         (ELEPHANT-TESTS::CRUNCH NIL NIL
> ;                                 (ELEPHANT:GET-VALUE ELEPHANT-TESTS::I
> ;                                                     ELEPHANT-TESTS::INDEX3))
> ;       (= ELEPHANT-TESTS::RES ELEPHANT-TESTS::I))
> ; --> MULTIPLE-VALUE-CALL
> ; ==>
> ;   #'(LAMBDA
> ;         (&OPTIONAL (ELEPHANT-TESTS::BOOL) (ELEPHANT-TESTS::RES) &REST #:G21)
> ;       (DECLARE (IGNORE #:G21))
> ;       (= ELEPHANT-TESTS::RES ELEPHANT-TESTS::I))
> ;
> ; caught STYLE-WARNING:
> ;   The variable BOOL is defined but never used.
> ;
> ; compilation unit finished
> ;   caught 1 STYLE-WARNING condition
> .
> ;
> ; note: cannot stack allocate value cell for CURS
> ;
> ; compilation unit finished
> ;   printed 1 note
> .
> ;
> ; note: cannot stack allocate value cell for CURS
> ;
> ; compilation unit finished
> ;   printed 1 note
> .
> ;
> ; note: cannot stack allocate value cell for CURS
> ;
> ; compilation unit finished
> ;   printed 1 note
> .
> ;
> ; note: cannot stack allocate value cell for CURS
> ;
> ; compilation unit finished
> ;   printed 1 note
> .
> ;
> ; note: cannot stack allocate value cell for CURS
> ;
> ; compilation unit finished
> ;   printed 1 note
> .
> ;
> ; note: cannot stack allocate value cell for C
> ;
> ; compilation unit finished
> ;   printed 1 note
> .
> ;
> ; note: cannot stack allocate value cell for CURS
> ;
> ; compilation unit finished
> ;   printed 1 note
> ...
> ;
> ; note: cannot stack allocate value cell for CURS
> ;
> ; compilation unit finished
> ;   printed 1 note
> .; in: LAMBDA NIL
> ;     (MULTIPLE-VALUE-BIND (ELEPHANT-TESTS::M ELEPHANT-TESTS::K
> ELEPHANT-TESTS::V)
> ;         (ELEPHANT:CURSOR-NEXT ELEPHANT-TESTS::C)
> ;       ELEPHANT-TESTS::V)
> ; --> MULTIPLE-VALUE-CALL
> ; ==>
> ;   #'(LAMBDA
> ;         (&OPTIONAL (ELEPHANT-TESTS::M) (ELEPHANT-TESTS::K) (ELEPHANT-TESTS::V)
> ;          &REST #:G91)
> ;       (DECLARE (IGNORE #:G91))
> ;       ELEPHANT-TESTS::V)
> ;
> ; caught STYLE-WARNING:
> ;   The variable M is defined but never used.
> ;
> ; caught STYLE-WARNING:
> ;   The variable K is defined but never used.
> 
> ;
> ; note: cannot stack allocate value cell for C
> ;
> ; compilation unit finished
> ;   caught 2 STYLE-WARNING conditions
> ;   printed 1 note
> ....
> ;
> ; note: cannot stack allocate value cell for C
> ;
> ; compilation unit finished
> ;   printed 1 note
> .
> ;
> ; note: cannot stack allocate value cell for C
> ;
> ; compilation unit finished
> ;   printed 1 note
> ...; in: LAMBDA NIL
> ;     (MULTIPLE-VALUE-BIND
> ;         (ELEPHANT-TESTS::M ELEPHANT-TESTS::K ELEPHANT-TESTS::V
> ELEPHANT-TESTS::P)
> ;         (ELEPHANT:CURSOR-PGET-BOTH ELEPHANT-TESTS::C 10 107)
> ;       (VALUES ELEPHANT-TESTS::K ELEPHANT-TESTS::V ELEPHANT-TESTS::P))
> ; --> MULTIPLE-VALUE-CALL
> ; ==>
> ;   #'(LAMBDA
> ;         (&OPTIONAL (ELEPHANT-TESTS::M) (ELEPHANT-TESTS::K) (ELEPHANT-TESTS::V)
> ;          (ELEPHANT-TESTS::P)
> ;          &REST #:G79)
> ;       (DECLARE (IGNORE #:G79))
> ;       (VALUES ELEPHANT-TESTS::K ELEPHANT-TESTS::V ELEPHANT-TESTS::P))
> ;
> ; caught STYLE-WARNING:
> ;   The variable M is defined but never used.
> 
> ;
> ; note: cannot stack allocate value cell for C
> ;
> ; compilation unit finished
> ;   caught 1 STYLE-WARNING condition
> ;   printed 1 note
> ...; in: LAMBDA NIL
> ;     (MULTIPLE-VALUE-BIND
> ;         (ELEPHANT-TESTS::M ELEPHANT-TESTS::K ELEPHANT-TESTS::V
> ELEPHANT-TESTS::P)
> ;         (ELEPHANT:CURSOR-PGET-BOTH-RANGE ELEPHANT-TESTS::C 10 106.5)
> ;       (VALUES ELEPHANT-TESTS::K ELEPHANT-TESTS::V ELEPHANT-TESTS::P))
> ; --> MULTIPLE-VALUE-CALL
> ; ==>
> ;   #'(LAMBDA
> ;         (&OPTIONAL (ELEPHANT-TESTS::M) (ELEPHANT-TESTS::K) (ELEPHANT-TESTS::V)
> ;          (ELEPHANT-TESTS::P)
> ;          &REST #:G79)
> ;       (DECLARE (IGNORE #:G79))
> ;       (VALUES ELEPHANT-TESTS::K ELEPHANT-TESTS::V ELEPHANT-TESTS::P))
> ;
> ; caught STYLE-WARNING:
> ;   The variable M is defined but never used.
> 
> ;
> ; note: cannot stack allocate value cell for C
> ;
> ; compilation unit finished
> ;   caught 1 STYLE-WARNING condition
> ;   printed 1 note
> ...
> ;
> ; note: cannot stack allocate value cell for C
> ;
> ; compilation unit finished
> ;   printed 1 note
> ............
> ;
> ; note: cannot stack allocate value cell for C
> ;
> ; compilation unit finished
> ;   printed 1 note
> .............; in: LAMBDA NIL
> ;     (LAMBDA (ELEPHANT-TESTS::K ELEPHANT-TESTS::V ELEPHANT-TESTS::PK)
> ;       (UNLESS (ZEROP (MOD ELEPHANT-TESTS::K 33)) (RETURN NIL)))
> ; ==>
> ;   #'(LAMBDA (ELEPHANT-TESTS::K ELEPHANT-TESTS::V ELEPHANT-TESTS::PK)
> ;       (UNLESS (ZEROP (MOD ELEPHANT-TESTS::K 33)) (RETURN NIL)))
> ;
> ; caught STYLE-WARNING:
> ;   The variable V is defined but never used.
> ;
> ; caught STYLE-WARNING:
> ;   The variable PK is defined but never used.
> ;
> ; compilation unit finished
> ;   caught 2 STYLE-WARNING conditions
> .
> ;
> ; note: cannot stack allocate value cell for C
> ;
> ; compilation unit finished
> ;   printed 1 note
> ...............; in: LAMBDA NIL
> ;     (LET ((LIST (ELEPHANT:PSET-LIST ELEPHANT-TESTS::PSET1)))
> ;       (VALUES (= (LENGTH (ELEPHANT:PSET-LIST ELEPHANT-TESTS::PSET1)) 5)
> ;               (NOT
> ;                (ELEPHANT:FIND-ITEM 'ELEPHANT-TESTS::TEST2
> ELEPHANT-TESTS::PSET1))
> ;               (ELEPHANT-TESTS::IS-NOT-NULL
> ;                 (ELEPHANT:FIND-ITEM 'ELEPHANT-TESTS::TEST1
> ;                                     ELEPHANT-TESTS::PSET1))
> ;               (ELEPHANT-TESTS::IS-NOT-NULL
> ;                 (ELEPHANT:FIND-ITEM 1 ELEPHANT-TESTS::PSET1 :KEY (LAMBDA # #)
> ;                                     :TEST #'EQ))))
> ;
> ; caught STYLE-WARNING:
> ;   The variable LIST is defined but never used.
> ;
> ; compilation unit finished
> ;   caught 1 STYLE-WARNING condition
> .....
> Synchronizing IDX-ONE-B in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-ONE-C in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-ONE-D in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-ONE-E in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-ONE-F in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-TWO in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-CSLOT in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-THREE in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-FOUR in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-UNBOUND-DEL in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-FIVE-DEL in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-SEVEN in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-EIGHT in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> ....READY FOR ACTION
> f..f
> Synchronizing IDX-ONE-F in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> .READY FOR ACTION
> ...
> ;     (SETQ ELEPHANT-TESTS::INST4
> ;             (MAKE-INSTANCE 'ELEPHANT-TESTS::IDX-ONE-B :SLOT1 "onethousand" :SC
> ;                            ELEPHANT:*STORE-CONTROLLER*))
> ;
> ; caught WARNING:
> ;   undefined variable: INST4
> 
> ;     (SETQ ELEPHANT-TESTS::INST5
> ;             (MAKE-INSTANCE 'ELEPHANT-TESTS::IDX-ONE-B :SLOT1 "only" :SC
> ;                            ELEPHANT:*STORE-CONTROLLER*))
> ;
> ; caught WARNING:
> ;   undefined variable: INST5
> 
> ;     (SETQ ELEPHANT-TESTS::INST6
> ;             (MAKE-INSTANCE 'ELEPHANT-TESTS::IDX-ONE-B :SLOT1 "twothousand" :SC
> ;                            ELEPHANT:*STORE-CONTROLLER*))
> ;
> ; caught WARNING:
> ;   undefined variable: INST6
> ;
> ; compilation unit finished
> ;   Undefined variables:
> ;     INST4 INST5 INST6
> ;   caught 3 WARNING conditions
> Synchronizing IDX-ONE-B in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> ...
> Synchronizing IDX-ONE-C in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> ......
> Synchronizing IDX-ONE-D in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> ......
> Synchronizing IDX-ONE-E in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> ...............
> Synchronizing IDX-TWO-BASE in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-TWO-SUB1 in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-TWO-SUB1-1 in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-TWO-SUB2 in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-TWO-BASE in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-TWO-SUB1 in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-TWO-SUB1-1 in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-TWO-SUB2 in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> .....; in: LAMBDA NIL
> ;     (LET ((#:RESULT154 (MULTIPLE-VALUE-LIST (PROGN # # # # #))))
> ;       )
> ;
> ; caught STYLE-WARNING:
> ;   The variable #:RESULT154 is defined but never used.
> ;
> ; compilation unit finished
> ;   caught 1 STYLE-WARNING condition
> Synchronizing IDX-FOUR in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> ..
> STYLE-WARNING: redefining MAKE-IDX-FOUR in DEFUN
> .................f
> ;     (ELEPHANT-TESTS::SLOT6 ELEPHANT-TESTS::O1)
> ;
> ; caught STYLE-WARNING:
> ;   undefined function: SLOT6
> ;
> ; compilation unit finished
> ;   Undefined function:
> ;     SLOT6
> ;   caught 1 STYLE-WARNING condition
> Synchronizing IDX-EIGHT in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing IDX-EIGHT in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> indexing redef-class d
> ........
> Ranged get of 10/700 objects = Linear: 0.24 sec Indexed: 0.0 sec
> .......
> ;     (SETF (ELEPHANT-TESTS::JOBS ELEPHANT-TESTS::P) ELEPHANT-TESTS::J)
> ; --> LET* MULTIPLE-VALUE-BIND LET FUNCALL
> ; ==>
> ;   (SB-C::%FUNCALL #'(SETF ELEPHANT-TESTS::JOBS) #:NEW29 #:TMP30)
> ;
> ; caught STYLE-WARNING:
> ;   undefined function: (SETF JOBS)
> ;
> ; compilation unit finished
> ;   Undefined function:
> ;     (SETF JOBS)
> ;   caught 1 STYLE-WARNING condition
> Synchronizing PERSON in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing JOB in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> ..
> Synchronizing PERSON in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing JOB in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> Synchronizing PJASSOC in (BDB
> 
> /home/thomas/sources/clbuild/source/elephant/tests/testdb/)
> ..
> Single store mode: ignoring.
> Single store mode: ignoring.
> Single store mode: ignoring.; in: LAMBDA NIL
> ;     (LET ((ELEPHANT-TESTS::OLD-STORE ELEPHANT:*STORE-CONTROLLER*)
> ;           (ELEPHANT:*STORE-CONTROLLER* NIL)
> ;           (ELEPHANT-TESTS::RV NIL)
> ;           (ELEPHANT-TESTS::SC1
> ;            (ELEPHANT:OPEN-STORE ELEPHANT-TESTS::*TEST-SPEC-PRIMARY*
> :RECOVER T))
> ;           (ELEPHANT-TESTS::SC2
> ;            (ELEPHANT:OPEN-STORE ELEPHANT-TESTS::*TEST-SPEC-SECONDARY* :RECOVER
> ;                                 T)))
> ;       (UNWIND-PROTECT
> ;           (LET* ((ELEPHANT-TESTS::IBT #))
> ;             (ELEPHANT::INITIALIZE-MIGRATE-DUPLICATE-DETECTION)
> ;             (LET (#)
> ;               (ELEPHANT:WITH-TRANSACTION #
> ;                 #)
> ;               (LET* #
> ;                 #
> ;                 #)))
> ;         (PROGN
> ;          (ELEPHANT::CLEAR-MIGRATE-DUPLICATE-DETECTION)
> ;          (SETQ ELEPHANT:*STORE-CONTROLLER* ELEPHANT-TESTS::OLD-STORE)
> ;          (ELEPHANT:CLOSE-STORE ELEPHANT-TESTS::SC1)
> ;          (ELEPHANT:CLOSE-STORE ELEPHANT-TESTS::SC2))))
> ;
> ; caught STYLE-WARNING:
> ;   The variable RV is defined but never used.
> ;
> ; compilation unit finished
> ;   caught 1 STYLE-WARNING condition
> 
> Single store mode: ignoring.
> Single store mode: ignoring.
> Single store mode: ignoring......
> Single store mode: ignoring .......
> Single store mode: ignoring.
> Did 508 checks.
>   Pass: 505 (99%)
>   Skip: 0 ( 0%)
>   Fail: 3 ( 0%)
> 
> Failure Details:
> --------------------------------
> INDEXING-CHANGE-CLASS []:
>     1 evaluated to 1, which is not = to 2..
> --------------------------------
> --------------------------------
> INDEXING-BASIC []:
>     (LENGTH (GET-INSTANCES-BY-VALUE 'IDX-ONE-F 'SLOT1 N)) evaluated
> to 4, which is not = to 2..
> --------------------------------
> --------------------------------
> INDEXING-BASIC []:
>     (LENGTH (GET-INSTANCES-BY-RANGE 'IDX-ONE-F 'SLOT1 N (+ 1 N)))
> evaluated to 5, which is not = to 3..
> --------------------------------
> 
> NIL
> ELE-TESTS>
> ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------
> 
> _______________________________________________
> elephant-devel site list
> elephant-devel at common-lisp.net
> http://common-lisp.net/mailman/listinfo/elephant-devel





More information about the elephant-devel mailing list