[elephant-devel] Btree-index-cursor issues

[Tayssir John Gabbour]

Hi!

Is there something like WITH-INDEX-CURSOR or WITH-BTREE-INDEX-CURSOR?



Also, btree-index-cursors (under Postmodern) can't print, signalling an 
unbound-slot error:


(open-store *my-spec*)
(add-to-root :blah (make-indexed-btree))
(add-index (get-from-root :blah)
            :index-name :ind
            :key-form '(lambda (secondary-db primary-key value)
                        (declare (ignore secondary-db primary-key))
                        (if (evenp value)
                            (values t 0)
                            (values t 1))))
(setf (get-value :test1 (get-from-root :blah))
       1
       (get-value :test2 (get-from-root :blah))
       2
       (get-value :test3 (get-from-root :blah))
       3)
(defparameter *blah* (make-cursor (get-index (get-from-root :blah) :ind)))


*blah*

;; debugger invoked on a UNBOUND-SLOT in thread
;; #<THREAD "worker" {B0A9371}>:
;; (A UNBOUND-SLOT was caught when trying to print
;; SB-DEBUG:*DEBUG-CONDITION* when entering the debugger.
;; Printing was aborted and the UNBOUND-SLOT was stored in
;; SB-DEBUG::*NESTED-DEBUG-CONDITION*.)
;; (CELL-ERROR-NAME SB-DEBUG::*NESTED-DEBUG-CONDITION*) =
;;        DB-POSTMODERN::NAME




(I'm running Elephant 0.9, Postmodern 1.12, SBCL 1.0.12 and Debian Linux.)


Thanks,
Tayssir