[elephant-devel] elephant-1.0 on Lispworks+win32; bdb; postmodern
Chun Tian (binghe)
binghe.lisp at gmail.com
Wed Feb 4 02:27:32 UTC 2009
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" <eslick at media.mit.edu>
>> Gesendet: 03.02.09 18:11:44
>> An: Elephant bugs and development <elephant-devel at 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" <eslick at 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 at common-lisp.net
>>> http://common-lisp.net/mailman/listinfo/elephant-devel
>>
>>
>> _______________________________________________
>> elephant-devel site list
>> elephant-devel at 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 at common-lisp.net
> http://common-lisp.net/mailman/listinfo/elephant-devel
--
Chun Tian (binghe)
NetEase.com, Inc.
P. R. China
More information about the elephant-devel
mailing list