[elephant-devel] lispworks

[franks-muc at web.de]

Hello again !
in my previous post of today I thought that elephant does not run in lispworks on win32 due to 
a problem in clsql. This was wrong.
In fact, no tests failed for clsql. 
The problem appears to relate more to elephant: 


ELE-TESTS 1 : 1 > :bb
#<PACKAGE ELEPHANT-TESTS>

Condition: Dynamic-Slot-Value-Using-Slotd is not defined for slot ELEPHANT::%OID in #<ELEPHANT-CLSQL::SQL-INDEXED-BTREE 206833E4>
Call to (METHOD (SETF CLOS::DYNAMIC-SLOT-VALUE-USING-SLOTD) (T T T)) (offset 61)
  CLOS::NEW-VALUE : 1
  CLOS::INSTANCE  : #<ELEPHANT-CLSQL::SQL-INDEXED-BTREE 206833E4>
  CLOS::SLOTD     : #<ELEPHANT::PERSISTENT-EFFECTIVE-SLOT-DEFINITION ELEPHANT::%OID 21D6C934>

Binding frame:
  CLOS::*SETF-FROM-SLOT-MISSING* : NIL

Call to (METHOD (SETF CLOS::DYNAMIC-SLOT-VALUE-USING-SLOTD) (T T T)) (offset 136)
  CLOS::NEW-VALUE : 1
  CLOS::INSTANCE  : #<ELEPHANT-CLSQL::SQL-INDEXED-BTREE 206833E4>
  CLOS::SLOTD     : #<ELEPHANT::PERSISTENT-EFFECTIVE-SLOT-DEFINITION ELEPHANT::%OID 21D6C934>

Call to (METHOD INITIALIZE-INSTANCE :BEFORE (PERSISTENT)) (offset 73)
  ELEPHANT::INSTANCE : #<ELEPHANT-CLSQL::SQL-INDEXED-BTREE 206833E4>
  ELEPHANT::INITARGS : :DONT-KNOW
  ELEPHANT::FROM-OID : 1
  ELEPHANT::SC       : #<ELEPHANT-CLSQL::SQL-STORE-CONTROLLER 20786A84>
  CLOS::.ISL.        : :DONT-KNOW

Binding frame:
  CLOS::*NEXT-METHODS* : NIL

Call to #<function 203E4F82> (offset 51)

Call to #<function 203EA512> (offset 126)

Call to CLOS::MAKE-INSTANCE-FROM-CLASS-1 (offset 469)
  CLASS          : #<PERSISTENT-METACLASS ELEPHANT-CLSQL::SQL-INDEXED-BTREE 21D24E04>
  CLOS::INITARGS : (:SC #<ELEPHANT-CLSQL::SQL-STORE-CONTROLLER 20786A84> :FROM-OID 1)

Call to (METHOD ELEPHANT::OPEN-CONTROLLER (ELEPHANT-CLSQL::SQL-STORE-CONTROLLER)) (offset 304)
  ELEPHANT-CLSQL::SC            : #<ELEPHANT-CLSQL::SQL-STORE-CONTROLLER 20786A84>
  DBG::G                        : :DONT-KNOW
  ELEPHANT-CLSQL::RECOVER       : :DONT-KNOW
  ELEPHANT-CLSQL::RECOVER-FATAL : :DONT-KNOW
  ELEPHANT-CLSQL::THREAD        : :DONT-KNOW
  CLOS::.ISL.                   : #(#<record #<record 1441 (ELEPHANT::SPEC ELEPHANT::INSTANCE-CACHE ELEPHANT::ROOT ELEPHANT::CLASS-ROOT ELEPHANT-CLSQL::DB) NIL #<STANDARD-CLASS ELEPHANT-CLSQL::SQL-STORE-CONTROLLER 21D23ADC>> #<record 3 2 4> NIL NIL> #<record ELEPHANT::CLASS-ROOT ELEPHANT::ROOT ELEPHANT-CLSQL::DB> 2 0)
  CLOS::.PV.                    : #<record 3 2 4>
  ELEPHANT-CLSQL::DBTYPE        : :POSTGRESQL-SOCKET
  ELEPHANT-CLSQL::CON           : #<CLSQL-POSTGRESQL-SOCKET:POSTGRESQL-SOCKET-DATABASE localhost/clsql-tests/postgres OPEN 21D655EC>

Call to #<function 203EA512> (offset 126)

Call to OPEN-STORE (offset 136)
  ELEPHANT::SPEC          : (:CLSQL (:POSTGRESQL-SOCKET "localhost" "clsql-tests" "postgres" "$postgres%"))
  ELEPHANT::RECOVER       : NIL
  ELEPHANT::RECOVER-FATAL : NIL
  ELEPHANT::THREAD        : T

Binding frame:
  *STORE-CONTROLLER* : NIL

Call to DO-BACKEND-TESTS (offset 93)

Is there a solution ?
Can I still hope to run elephant on windows in lispworks (or clisp) ?

Frank Schorr
_____________________________________________________________________
Der WEB.DE SmartSurfer hilft bis zu 70% Ihrer Onlinekosten zu sparen!
http://smartsurfer.web.de/?mc=100071&distributionid=000000000071