[elephant-devel] unstable on LW win32
Ian Eslick
eslick at media.mit.edu
Sun Jul 27 21:17:08 UTC 2008
I haven't looked at Lispworks and Elephant for awhile. However, I
think there is some issue with UFFI and Lispworks and the serializer.
To establish a baseline; does the stable elephant currently work with
Lispworks?
Ian
On Jul 27, 2008, at 5:01 PM, Frank Schorr wrote:
> I can run the tests with lift now. They all result in an error,
> because I can't open a store.
>
> This is unstable on Lispworks win32:
>
> (asdf:operate 'asdf:load-op :elephant)
> (asdf:operate 'asdf:load-op :ele-bdb)
> (elephant:open-store '(:BDB #p"c:/temp/testdb/"))
>
> The condition #<ELEPHANT:ELEPHANT-DESERIALIZATION-ERROR 226062AC>
> occurred
> 1 (abort) Abort job 3 :(BIND-STANDARD-STREAMS-AND-EXECUTE
> #<EDITOR::EDITOR-OUTPUT-STREAM #<EDITOR:BUFFER Background Output>
> 221E9F5B> (FUNCALL-BACKGROUND-JOB-AUX #<CAPI:EDITOR-PANE CAPI:EDITOR-
> PANE 2223DF5B> BACKGROUND-REGION-EVAL (# # # # T NIL NIL)))
>
>
>
> CL-USER 5 : 1 > :b :verbose
> Call to ELEPHANT::DESERIALIZE (offset 358)
> ELEPHANT::BS : #S(ELEPHANT-MEMUTIL:BUFFER-STREAM :BUFFER
> #<Pointer to type (:UNSIGNED :CHAR) = #x0039D340> :SIZE 45 :POSITION
> 2844 :LENGTH 80)
> ELEPHANT::SC : #<BDB-STORE-CONTROLLER c:\temp\testdb\>
> ELEPHANT::OID-ONLY : NIL
> DBG::G : #<CONDITIONS::COERCE-TO-CONDITION-ERROR
> 2176D46F>
> ELEPHANT::E : #<CONDITIONS::COERCE-TO-CONDITION-ERROR
> 2176D46F>
>
> Call to (METHOD ELEPHANT::PERSISTENT-SLOT-READER (DB-BDB::BDB-STORE-
> CONTROLLER T T)) (offset 175)
> DB-BDB::SC : #<BDB-STORE-CONTROLLER c:\temp\testdb\>
> DB-BDB::INSTANCE : #<BDB-INDEXED-BTREE oid:-3>
> DB-BDB::NAME : DB-BDB::INDICES
> CLOS::.ISL. : :DONT-KNOW
> DB-BDB::KEY-BUF : #S(ELEPHANT-MEMUTIL:BUFFER-STREAM :BUFFER
> #<Pointer to type (:UNSIGNED :CHAR) = #x00941FB0> :SIZE 28 :POSITION
> 0 :LENGTH 80)
> DB-BDB::VALUE-BUF : #S(ELEPHANT-MEMUTIL:BUFFER-STREAM :BUFFER
> #<Pointer to type (:UNSIGNED :CHAR) = #x0039D340> :SIZE 45 :POSITION
> 2844 :LENGTH 80)
> DB-BDB::BUF : #S(ELEPHANT-MEMUTIL:BUFFER-STREAM :BUFFER
> #<Pointer to type (:UNSIGNED :CHAR) = #x0039D340> :SIZE 45 :POSITION
> 2844 :LENGTH 80)
>
> Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 45)
>
> Call to (METHOD CLOS::DYNAMIC-SLOT-VALUE-USING-SLOTD (T T)) (offset
> 120)
> CLOS::INSTANCE : #<BDB-INDEXED-BTREE oid:-3>
> CLOS::SLOTD : #<ELEPHANT::PERSISTENT-EFFECTIVE-SLOT-DEFINITION
> DB-BDB::INDICES 217232EB>
>
> Call to (METHOD SHARED-INITIALIZE :AFTER (DB-BDB::BDB-INDEXED-BTREE
> T)) (offset 14)
>
> Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 152)
>
> Call to (SUBFUNCTION CALL-NEXT-METHOD (METHOD SHARED-
> INITIALIZE :AROUND (ELEPHANT:PERSISTENT-OBJECT T))) (offset 201)
>
> Call to (METHOD SHARED-INITIALIZE :AROUND (ELEPHANT:PERSISTENT-
> OBJECT T)) (offset 561)
> ELEPHANT::INSTANCE : #<BDB-INDEXED-BTREE
> oid:-3>
> ELEPHANT::SLOT-NAMES : T
> ELEPHANT::INITARGS : (:FROM-OID -3 :SC #<BDB-
> STORE-CONTROLLER c:\temp\testdb\> :INDICES #<EQL Hash Table{0}
> 200EF94F>)
> ELEPHANT::FROM-OID : -3
> ELEPHANT:CACHE-MODE : NIL
> CLOS::.ISL. : :DONT-KNOW
> DBG::G : (#<Closure CLOS::METHOD-
> COMBINATION-TEMPLATE 200F101A>)
> DBG::G : #<ELEPHANT:PERSISTENT-
> METACLASS DB-BDB::BDB-INDEXED-BTREE 2171310F>
> ELEPHANT::TRANSIENT-SLOTS : (ELEPHANT::OID
> ELEPHANT::SPEC ELEPHANT:CACHE-MODE DB-BDB::INDICES-CACHE)
> ELEPHANT::CACHED-SLOTS : NIL
> ELEPHANT::INDEXED-SLOTS : NIL
> ELEPHANT::DERIVED-SLOTS : NIL
> ELEPHANT::ASSOCIATION-END-SLOTS : NIL
> ELEPHANT::PERSISTENT-SLOTS : (DB-BDB::INDICES)
> CLASS : #<ELEPHANT:PERSISTENT-
> METACLASS DB-BDB::BDB-INDEXED-BTREE 2171310F>
> ELEPHANT::PERSISTENT-INITIALIZABLE-SLOTS : (DB-BDB::INDICES)
> ELEPHANT::SET-SLOTS : NIL
>
> Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 45)
>
> Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 79)
>
> Call to CLOS::NEXT-METHOD-CALL-2 (offset 87)
> CONS : (METHOD INITIALIZE-INSTANCE :AROUND
> (ELEPHANT:PERSISTENT-OBJECT))
> CLOS::NEXT-METHODS : (#<Closure CLOS::METHOD-COMBINATION-TEMPLATE
> 200EFF22>)
> #:G174431 : #<BDB-INDEXED-BTREE oid:-3>
> #:G174432 : (:FROM-OID -3 :SC #<BDB-STORE-CONTROLLER c:
> \temp\testdb\> :INDICES #<EQL Hash Table{0} 200EF94F>)
>
> Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 42)
>
> Call to CLOS::MAKE-INSTANCE-FROM-CLASS-1 (offset 452)
> CLASS : #<ELEPHANT:PERSISTENT-METACLASS DB-BDB::BDB-
> INDEXED-BTREE 2171310F>
> CLOS::INITARGS : (:FROM-OID -3 :SC #<BDB-STORE-CONTROLLER c:\temp
> \testdb\> :INDICES #<EQL Hash Table{0} 200EF94F>)
>
> 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 383)
> DB-BDB::SC : #<BDB-STORE-CONTROLLER c:\temp
> \testdb\>
> DB-BDB::TXN-FN : #<Closure ((METHOD ELEPHANT::OPEN-
> CONTROLLER (DB-BDB::BDB-STORE-CONTROLLER)) . 2) 200E8742>
> 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
> CLOS::.ISL. : :DONT-KNOW
> DB-BDB::ENV : #<Pointer to type :VOID =
> #x016E44C0>
> COUNT : 0
> DB-BDB::SUCCESS : NIL
> DB-BDB::TXN : #<Pointer to type :VOID =
> #x016E6BB8>
> DB-BDB::RESULT : NIL
> ELEPHANT::*CURRENT-TRANSACTION* : (#<BDB-STORE-CONTROLLER c:\temp
> \testdb\> . #<Pointer to type :VOID = #x016E6BB8>)
> ELEPHANT:*STORE-CONTROLLER* : #<BDB-STORE-CONTROLLER c:\temp
> \testdb\>
>
> Call to (METHOD ELEPHANT::OPEN-CONTROLLER (DB-BDB::BDB-STORE-
> CONTROLLER)) (offset 1899)
>
> Call to CLOS::METHOD-COMBINATION-TEMPLATE (offset 62)
>
> Call to ELEPHANT:OPEN-STORE (offset 66)
> ELEPHANT::SPEC : (:BDB #P"c:/temp/testdb/")
> ELEPHANT::ARGS : NIL
> ELEPHANT::CONTROLLER : #<BDB-STORE-CONTROLLER c:\temp\testdb\>
>
> Call to EVAL (offset 113)
> EXP : (ELEPHANT:OPEN-STORE (QUOTE (:BDB #P"c:/temp/testdb/")))
>
> Call to EDITOR::EDITOR-EVAL (offset 177)
> EDITOR:BUFFER : :DONT-KNOW
> EDITOR::SEXP : (ELEPHANT:OPEN-STORE (QUOTE (:BDB #P"c:/temp/
> testdb/")))
> EDITOR::ERRORP : T
>
> Call to (SUBFUNCTION 3 (SUBFUNCTION 1 EDITOR::REGION-LISP-EVAL))
> (offset 26)
> EDITOR::FORM : (ELEPHANT:OPEN-STORE (QUOTE (:BDB #P"c:/temp/
> testdb/")))
> 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 1681
> 200AC743>
> EDITOR::END : #<EDITOR::POINT "work.lisp" 0 offset 1730
> 200AD187>
> 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 1681
> 200AC743>
> EDITOR::START-MESSAGE : "Evaluating..."
> EDITOR::END-MESSAGE : "Finished evaluating"
> EDITOR::BODY-FN : #<Closure (EDITOR::REGION-LISP-EVAL . 1)
> 200ACC3A>
>
> Call to EDITOR::REGION-LISP-EVAL (offset 204)
> EDITOR:BUFFER : #<EDITOR:BUFFER work.lisp>
> EDITOR::START : #<EDITOR::POINT "work.lisp" 0 offset 1681 200AC743>
> EDITOR::END : #<EDITOR::POINT "work.lisp" 0 offset 1730 200AD187>
> PRINT : T
>
> Call to EDITOR::BACKGROUND-REGION-EVAL (offset 103)
> EDITOR::WINDOW : #<EDITOR::WM-WINDOW "work.lisp" 222436AF>
> EDITOR:BUFFER : #<EDITOR:BUFFER work.lisp>
> EDITOR::START : #<EDITOR::POINT "work.lisp" 0 offset 1681
> 200AC743>
> EDITOR::END : #<EDITOR::POINT "work.lisp" 0 offset 1730
> 200AD187>
> 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 2223DF5B>
> FUNCTION : EDITOR::BACKGROUND-REGION-EVAL
> CAPI::ARGS : (#<EDITOR::WM-WINDOW "work.lisp" 222436AF>
> #<EDITOR:BUFFER work.lisp> #<EDITOR::POINT "work.lisp" 0 offset 1681
> 200AC743> #<EDITOR::POINT "work.lisp" 0 offset 1730 200AD187> T NIL
> NIL)
>
> Call to CAPI::BIND-STANDARD-STREAMS-AND-EXECUTE (offset 204)
> STREAM : #<EDITOR::EDITOR-OUTPUT-STREAM #<EDITOR:BUFFER
> Background Output> 221E9F5B>
> CAPI::FUNC-ARGS : (CAPI::FUNCALL-BACKGROUND-JOB-AUX #<CAPI:EDITOR-
> PANE CAPI:EDITOR-PANE 2223DF5B> EDITOR::BACKGROUND-REGION-EVAL
> (#<EDITOR::WM-WINDOW "work.lisp" 222436AF> #<EDITOR:BUFFER
> work.lisp> #<EDITOR::POINT "work.lisp" 0 offset 1681 200AC743>
> #<EDITOR::POINT "work.lisp" 0 offset 1730 200AD187> 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 1" Priority
> 70000000 State "Running">
> MP::SYMBOLS : NIL
>
>
> CL-USER 6 : 1 >
> _____________________________________________________________________
> Der WEB.DE SmartSurfer hilft bis zu 70% Ihrer Onlinekosten zu sparen!
> http://smartsurfer.web.de/?mc=100071&distributionid=000000000066
>
> _______________________________________________
> elephant-devel site list
> elephant-devel at common-lisp.net
> http://common-lisp.net/mailman/listinfo/elephant-devel
More information about the elephant-devel
mailing list