Hi, Frank What's your LispWorks version? Currently I even cannot compile elephant (MOP issue) on LispWorks 5.1
--binghe On 2009-2-4, at 06:17, Frank Schorr wrote: > Ian, > thanks for taking care of windows! > darcs get http://www.common-lisp.net/project/elephant/darcs/elephant-1.0 > pulls the latest version, right ? > I'm afraid that nothing changed. On (ele:open-store *db-spec*) I > receive > Error: The slot ELEPHANT::SCHEMA-NAME-INDEX is unbound in the object > #<BDB-STORE-CONTROLLER c:/temp/testdb/> (an instance of class > #<STANDARD-CLASS DB-BDB::BDB-STORE-CONTROLLER 216C5233>). > > Frank. > >> -----Ursprüngliche Nachricht----- >> Von: "Ian Eslick" <esl...@media.mit.edu> >> Gesendet: 03.02.09 18:11:44 >> An: Elephant bugs and development <elephant-devel@common-lisp.net> >> Betreff: Re: [elephant-devel] elephant-1.0 on Lispworks+win32; bdb; >> postmodern > > >> Hi Frank, >> >> Does the latest source tree resolve this bug? >> >> Ian >> >> >> On Jan 28, 2009, at 2:08 PM, Frank Schorr wrote: >> >>>> -----Ursprüngliche Nachricht----- >>>> Von: "Ian Eslick" <esl...@media.mit.edu> >>> >>>> >>>> Did this happen on the first open-controller or somewhere in the >>>> middle of the tests? >>>> >>> >>> I can't tell. >>> But I tried this: >>> >>> (asdf:operate 'asdf:load-op :elephant) >>> (asdf:operate 'asdf:load-op :ele-bdb) >>> (setf *db-spec* '(:BDB "c:/temp/testdb/")) >>> (ele:open-store *db-spec*) >>> >>> [The bdb files are created in the directory. Hope this helps] >>> >>> Error: The slot ELEPHANT::SCHEMA-NAME-INDEX is unbound in the object >>> #<BDB-STORE-CONTROLLER c:/temp/testdb/> (an instance of class >>> #<STANDARD-CLASS DB-BDB::BDB-STORE-CONTROLLER 21F0DF4F>). >>> 1 (continue) Try reading slot ELEPHANT::SCHEMA-NAME-INDEX again. >>> 2 Specify a value to use this time for slot ELEPHANT::SCHEMA-NAME- >>> INDEX. >>> 3 Specify a value to set slot ELEPHANT::SCHEMA-NAME-INDEX to. >>> 4 (abort) Abort job 4 :(BIND-STANDARD-STREAMS-AND-EXECUTE >>> #<EDITOR::EDITOR-OUTPUT-STREAM #<EDITOR:BUFFER Background Output> >>> 21CE1B7F> (FUNCALL-BACKGROUND-JOB-AUX #<CAPI:EDITOR-PANE >>> CAPI:EDITOR- >>> PANE 217334BB> BACKGROUND-REGION-EVAL (# # # # T NIL NIL))) >>> >>> Type :b for backtrace, :c <option number> to proceed, or :? for >>> other options >>> >>> CL-USER 1 : 1 > :b :verbose >>> Call to (METHOD SLOT-UNBOUND (T T T)) (offset 512) >>> CLASS : #<STANDARD-CLASS DB-BDB::BDB-STORE-CONTROLLER >>> 21F0DF4F> >>> CLOS::INSTANCE : #<BDB-STORE-CONTROLLER c:/temp/testdb/> >>> CLOS::SLOT-NAME : ELEPHANT::SCHEMA-NAME-INDEX >>> >>> Call to CLOS::CALL-SLOT-UNBOUND-FUNCTION (offset 21) >>> CLASS : #<STANDARD-CLASS DB-BDB::BDB-STORE-CONTROLLER >>> 21F0DF4F> >>> CLOS::INSTANCE : #<BDB-STORE-CONTROLLER c:/temp/testdb/> >>> CLOS::SLOT-NAME : ELEPHANT::SCHEMA-NAME-INDEX >>> >>> Call to ELEPHANT::GET-DB-SCHEMAS (offset 31) >>> >>> Call to ELEPHANT::GET-CURRENT-DB-SCHEMA (offset 23) >>> >>> Call to (METHOD ELEPHANT::LOOKUP-SCHEMA (ELEPHANT:STORE-CONTROLLER >>> ELEPHANT:PERSISTENT-METACLASS)) (offset 91) >>> >>> Call to (METHOD CLOS:FINALIZE-INHERITANCE :AFTER >>> (ELEPHANT:PERSISTENT-METACLASS)) (offset 361) >>> ELEPHANT::INSTANCE : #<ELEPHANT:PERSISTENT-METACLASS >>> ELEPHANT:PERSISTENT-OBJECT 21344DAF> >>> CLOS::.ISL. : #(#(#(1477 (CLOS::DEPENDENTS CLOS::NAME >>> CLOS:DEFAULT-INITARGS CLOS::DIRECT-DEFAULT-INITARGS CLOS::DIRECT- >>> SLOTS CLOS::DIRECT-SUBCLASSES CLOS::DIRECT-SUPERCLASSES >>> CLOS::PRECEDENCE-LIST CLOS::EFFECTIVE-SLOTS CLOS::NO-INSTANCE-SLOTS >>> CLOS::PROTOTYPE CLOS::DIRECT-METHODS CLOS::WRAPPER >>> CLOS::CONSTRUCTORS CLOS::DOCUMENTATION-SLOT CLOS::PLIST >>> CLOS::POTENTIAL-INITARGS CLOS::MAKE-INSTANCE-FLAGS ELEPHANT::%CLASS- >>> SCHEMA ELEPHANT::%STORE-SCHEMAS ELEPHANT::%CLASS-INDEXING ELEPHANT:: >>> %CACHE-STYLE) NIL #<STANDARD-CLASS ELEPHANT:PERSISTENT-METACLASS >>> 21352493> STANDARD-CLASS) #(20) NIL NIL) ELEPHANT::%CLASS-INDEXING 2 >>> 0) >>> CLOS::.PV. : #(20) >>> ELEPHANT::OLD-SCHEMA : NIL >>> ELEPHANT::NEW-SCHEMA : #<CLASS-SCHEMA PERSISTENT-OBJECT> >>> >>> Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 140) >>> >>> Call to CLOS::ENSURE-CLASS-FINALIZED (offset 150) >>> CLASS : #<ELEPHANT:PERSISTENT-METACLASS ELEPHANT:PERSISTENT-OBJECT >>> 21344DAF> >>> >>> Call to CLOS::ENSURE-CLASS-FINALIZED (offset 336) >>> CLASS : #<ELEPHANT:PERSISTENT-METACLASS DB-BDB::BDB-INDEXED-BTREE >>> 21E77043> >>> >>> Call to (METHOD CLOS:DEFAULT-INITARGS (CLASS T)) (offset 27) >>> CLASS : #<ELEPHANT:PERSISTENT-METACLASS DB-BDB::BDB- >>> INDEXED-BTREE 21E77043> >>> CLOS::INITARGS : (:FROM-OID -3 :SC #<BDB-STORE-CONTROLLER c:/temp/ >>> testdb/> :INDICES #<EQL Hash Table{0} 2173A1AF>) >>> >>> Call to CLOS::MAKE-INSTANCE-FROM-CLASS-1 (offset 386) >>> CLASS : #<ELEPHANT:PERSISTENT-METACLASS DB-BDB::BDB- >>> INDEXED-BTREE 21E77043> >>> CLOS::INITARGS : (:FROM-OID -3 :SC #<BDB-STORE-CONTROLLER c:/temp/ >>> testdb/> :INDICES #<EQL Hash Table{0} 2173A1AF>) >>> >>> Call to (SUBFUNCTION 2 (METHOD ELEPHANT::OPEN-CONTROLLER (DB- >>> BDB::BDB-STORE-CONTROLLER))) (offset 175) >>> >>> Call to (METHOD ELEPHANT::EXECUTE-TRANSACTION (DB-BDB::BDB-STORE- >>> CONTROLLER T)) (offset 741) >>> DB-BDB::SC : #<BDB-STORE-CONTROLLER c:/temp/ >>> testdb/> >>> DB-BDB::TXN-FN : #<Closure ((METHOD ELEPHANT::OPEN- >>> CONTROLLER (DB-BDB::BDB-STORE-CONTROLLER)) . 2) 21E8DD72> >>> DBG::G : :DONT-KNOW >>> DB-BDB::TRANSACTION : :DONT-KNOW >>> DB-BDB::PARENT : NIL >>> DB-BDB::ENVIRONMENT : NIL >>> DB-BDB::RETRIES : 200 >>> DB-BDB::DEGREE-2 : NIL >>> DB-BDB::READ-UNCOMMITTED : NIL >>> DB-BDB::TXN-NOSYNC : NIL >>> DB-BDB::TXN-NOWAIT : NIL >>> DB-BDB::TXN-SYNC : NIL >>> DB-BDB::SNAPSHOT : NIL >>> DB-BDB::INHIBIT-ROLLBACK-FN : NIL >>> CLOS::.ISL. : :DONT-KNOW >>> DB-BDB::ENV : #<Pointer to type :VOID = >>> #x00F04500> >>> COUNT : 0 >>> DB-BDB::SUCCESS : NIL >>> DB-BDB::TXN : #<Pointer to type :VOID = >>> #x00F06B58> >>> DB-BDB::RESULT : NIL >>> ELEPHANT::*CURRENT-TRANSACTION* : (#<BDB-STORE-CONTROLLER c:/temp/ >>> testdb/> #<Pointer to type :VOID = #x00F06B58> NIL) >>> ELEPHANT:*STORE-CONTROLLER* : #<BDB-STORE-CONTROLLER c:/temp/ >>> testdb/> >>> DBG::G : #<Closure ((METHOD >>> ELEPHANT::EXECUTE-TRANSACTION (DB-BDB::BDB-STORE-CONTROLLER T)) . 2) >>> 2187F16A> >>> CONDITIONS::*HANDLER-CLUSTERS* : (((CONDITION . #<Closure # >>> 2187F16A>)) ((WARNING . EDITOR::EDITOR-EVALUATION-WARNING)) ((END- >>> OF- >>> FILE . #<Closure # 21E2EC3A>) (READER-ERROR . #<Closure # >>> 2187F62A>))) >>> >>> Call to (METHOD ELEPHANT::OPEN-CONTROLLER (DB-BDB::BDB-STORE- >>> CONTROLLER)) (offset 2211) >>> >>> Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 62) >>> >>> Call to ELEPHANT:OPEN-STORE (offset 66) >>> >>> Call to EVAL (offset 113) >>> EXP : (ELEPHANT:OPEN-STORE *DB-SPEC*) >>> >>> Call to EDITOR::EDITOR-EVAL (offset 177) >>> EDITOR:BUFFER : :DONT-KNOW >>> EDITOR::SEXP : (ELEPHANT:OPEN-STORE *DB-SPEC*) >>> EDITOR::ERRORP : T >>> >>> Call to (SUBFUNCTION 3 (SUBFUNCTION 1 EDITOR::REGION-LISP-EVAL)) >>> (offset 26) >>> EDITOR::FORM : (ELEPHANT:OPEN-STORE *DB-SPEC*) >>> EDITOR:BUFFER : #<EDITOR:BUFFER work.lisp> >>> >>> Call to (SUBFUNCTION 1 EDITOR::REGION-LISP-EVAL) (offset 624) >>> #:BUFFER41963 : #<EDITOR:BUFFER work.lisp> >>> EDITOR:BUFFER : #<EDITOR:BUFFER work.lisp> >>> PRINT : T >>> EDITOR::START : #<EDITOR::POINT "work.lisp" 0 offset 4163 >>> 21E34127> >>> EDITOR::END : #<EDITOR::POINT "work.lisp" 0 offset 4189 >>> 21E3414F> >>> DBG::|block-catch-tag| : (NIL) >>> DBG::|block-catch-tag| : (NIL) >>> >>> Call to EDITOR::WITH-COMPILATION-ENVIRONMENT-AT-POINT-FN (offset >>> 266) >>> EDITOR::POINT : #<EDITOR::POINT "work.lisp" 0 offset 4163 >>> 21E34127> >>> EDITOR::START-MESSAGE : "Evaluating..." >>> EDITOR::END-MESSAGE : "Finished evaluating" >>> EDITOR::BODY-FN : #<Closure (EDITOR::REGION-LISP-EVAL . 1) >>> 21E2EC22> >>> >>> Call to EDITOR::REGION-LISP-EVAL (offset 204) >>> EDITOR:BUFFER : #<EDITOR:BUFFER work.lisp> >>> EDITOR::START : #<EDITOR::POINT "work.lisp" 0 offset 4163 21E34127> >>> EDITOR::END : #<EDITOR::POINT "work.lisp" 0 offset 4189 21E3414F> >>> PRINT : T >>> >>> Call to EDITOR::BACKGROUND-REGION-EVAL (offset 103) >>> EDITOR::WINDOW : #<EDITOR::WM-WINDOW "work.lisp" 216DE40F> >>> EDITOR:BUFFER : #<EDITOR:BUFFER work.lisp> >>> EDITOR::START : #<EDITOR::POINT "work.lisp" 0 offset 4163 >>> 21E34127> >>> EDITOR::END : #<EDITOR::POINT "work.lisp" 0 offset 4189 >>> 21E3414F> >>> PRINT : T >>> EDITOR::WARNINGS : NIL >>> EDITOR::AFTER-FUNCTION : NIL >>> >>> Call to CAPI::FUNCALL-BACKGROUND-JOB-AUX (offset 50) >>> CAPI::PANE : #<CAPI:EDITOR-PANE CAPI:EDITOR-PANE 217334BB> >>> FUNCTION : EDITOR::BACKGROUND-REGION-EVAL >>> CAPI::ARGS : (#<EDITOR::WM-WINDOW "work.lisp" 216DE40F> >>> #<EDITOR:BUFFER work.lisp> #<EDITOR::POINT "work.lisp" 0 offset 4163 >>> 21E34127> #<EDITOR::POINT "work.lisp" 0 offset 4189 21E3414F> T NIL >>> NIL) >>> >>> Call to CAPI::BIND-STANDARD-STREAMS-AND-EXECUTE (offset 204) >>> STREAM : #<EDITOR::EDITOR-OUTPUT-STREAM #<EDITOR:BUFFER >>> Background Output> 21CE1B7F> >>> CAPI::FUNC-ARGS : (CAPI::FUNCALL-BACKGROUND-JOB-AUX #<CAPI:EDITOR- >>> PANE CAPI:EDITOR-PANE 217334BB> EDITOR::BACKGROUND-REGION-EVAL >>> (#<EDITOR::WM-WINDOW "work.lisp" 216DE40F> #<EDITOR:BUFFER >>> work.lisp> #<EDITOR::POINT "work.lisp" 0 offset 4163 21E34127> >>> #<EDITOR::POINT "work.lisp" 0 offset 4189 21E3414F> T NIL NIL)) >>> >>> Call to MP::BACKGROUND-EXECUTE-LOOP (offset 629) >>> >>> Call to (SUBFUNCTION MP::PROCESS-SG-FUNCTION MP::INITIALIZE-PROCESS- >>> STACK) (offset 301) >>> MP::IGNORED : :DONT-KNOW >>> VALUES : NIL >>> MP:PROCESS : #<MP:PROCESS Name "Background execute 2" Priority >>> 50000000 State "Running"> >>> MP::SYMBOLS : NIL >>> >>> >>> CL-USER 2 : 1 > >>> >>> _______________________________________________________________________ >>> NUR NOCH BIS 31.01.! WEB.DE FreeDSL - Telefonanschluss + DSL >>> für nur 16,37 EURO/mtl.!* http://dsl.web.de/? >>> ac=OM.AD.AD008K13805B7069a >>> >>> >>> _______________________________________________ >>> 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 >> > > > ____________________________________________________________________ > Psssst! Schon vom neuen WEB.DE MultiMessenger gehört? > Der kann`s mit allen: http://www.produkte.web.de/messenger/?did=3123 > > > _______________________________________________ > elephant-devel site list > elephant-devel@common-lisp.net > http://common-lisp.net/mailman/listinfo/elephant-devel -- Chun Tian (binghe) NetEase.com, Inc. P. R. China _______________________________________________ elephant-devel site list elephant-devel@common-lisp.net http://common-lisp.net/mailman/listinfo/elephant-devel