[elephant-devel] secondary indices

[ml13 at onlinehome.de]

Hi,

while looking at the tutorial, I always get an error while trying to  
work with secondary indices.

I am doing this on openmcl "Version 1.0 (DarwinPPC32)" with BDB4.3.

It looks like the bdb-indexed-tree does not have enough slots??

Anyway, I am very happy to see that elephant has developed so much!!

		Kilian Sprotte


ELE> (defclass appointment ()
          ((date :accessor ap-date :initarg :date :type integer)
           (type :accessor ap-type :initarg :type :type string))
          (:metaclass persistent-metaclass))
#<PERSISTENT-METACLASS APPOINTMENT>

ELE> (defparameter *appointments* (with-transaction () (build-indexed- 
btree s)))
*APPOINTMENTS*

(add-appointment (encode-universal-time 0 0 0 22 12 2004) "Birthday")

Array index 4 out of bounds for #<SLOT-VECTOR  #x8D6863E> .
    [Condition of type SIMPLE-ERROR]

Restarts:
   0: [ABORT-REQUEST] Abort handling SLIME request.
   1: [ABORT-BREAK] Reset this process
   2: [ABORT] Kill this process

Backtrace:
   0: (#<CCL::STANDARD-KERNEL-METHOD SLOT-VALUE-USING-CLASS (STANDARD- 
CLASS T STANDARD-EFFECTIVE-SLOT-DEFINITION)> #<PERSISTENT-METACLASS  
BDB-INDEXED-BTREE> '(ADD-APPOINTMENT (ENCODE-UNIVERSAL-TIME 0 0 0 22  
12 2004) "Birthday") #<STRING-INPUT-STREAM  #x8D66486>)
       Locals:
         CLASS = #<PERSISTENT-METACLASS BDB-INDEXED-BTREE>
         CCL::SLOT-VECTOR = #<SLOT-VECTOR  #x8D6863E>
   1: (#<STANDARD-METHOD (SETF GET-VALUE) (T T BDB-INDEXED-BTREE)>  
#<APPOINTMENT #x8D662CE> 3312658800 #<BDB-INDEXED-BTREE #x8D6862E>)
       Locals:
         VALUE = #<APPOINTMENT #x8CABF7E>
         KEY = 3312658800
         BT = #<BDB-INDEXED-BTREE #x8CAC106>
         SC = #<BDB-STORE-CONTROLLER #x8C7E0BE>
   2: (ADD-APPOINTMENT 3312658800 "Birthday")
       Locals:
         DATE = 3312658800
         TYPE = "Birthday"
         ENV = #<A Mac Pointer #x180E000>
         #:G541 = 1
         #:G543 = NIL
         #:G540 = #<A Mac Pointer #x309450>
         *CURRENT-TRANSACTION* = #<A Null Mac Pointer>
         *AUTO-COMMIT* = T
         #:G546 = #<BDB-INDEXED-BTREE #x8CAC106>
       Catch-tags:
         NIL
         SLEEPYCAT::TRANSACTION