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@common-lisp.net
> http://common-lisp.net/mailman/listinfo/elephant-devel
_______________________________________________
elephant-devel site list
elephant-devel@common-lisp.net
http://common-lisp.net/mailman/listinfo/elephant-devel
