[elephant-devel] Problem with Elephant and CLSQL with SQLITE3

[Ian Eslick]

If robert can't look at this before I do, I'll try to look into it  
tomorrow.  Out of curiosity, what OS platform are you on?

Regards,
Ian

On Jul 17, 2008, at 2:04 AM, Anthony Fairchild wrote:

> Hello,
>
> I'm trying to get Elephant to work with Sqlite3.   I'm using  
> Lispworks 5.1, the latest Darcs version of Elephant and CLSQL  
> version 4.0.3.   My my-config.sexp is the base version.
>
> Here's what I get:
>
> CL-USER> (use-package :elephant)
> CL-USER> (open-store '(:clsql (:sqlite3 "my-db.db")))
> #<SQL-STORE-CONTROLLER (SQLITE3 my-db.db)>
> CL-USER> (add-to-root "my key" "my value")
> "my value"
> CL-USER> (get-from-root "my key")
>
> The condition #<ELEPHANT-DESERIALIZATION-ERROR 200B4A60> occurred
>    [Condition of type ELEPHANT-DESERIALIZATION-ERROR]
>
> Restarts:
>  0: [ABORT] Return to SLIME's top level.
>  1: [ABORT] Quit process.
>
> Backtrace:
>   0: CONDITIONS::CONDITIONS-ERROR (:INVISIBLEP T ELEPHANT- 
> DESERIALIZATION-ERROR (:CONDITION #<SIMPLE-TYPE-ERROR 200B34E3>))
>   1: ELEPHANT::DESERIALIZE (#S(ELEPHANT-MEMUTIL:BUFFER- 
> STREAM :BUFFER #<Pointer to type # = #x00102B80> :SIZE 13 :POSITION  
> 201330763 :LENGTH 20) #<SQL-STORE-CONTROLLER (SQLITE3 my-db.db)>)
>   2: ELEPHANT::DESERIALIZE-FROM-BASE64-STRING  
> ("CQgAAABteSB2YWx1ZQ==" #<SQL-STORE-CONTROLLER (SQLITE3 my-db.db)>)
>   3: DB-CLSQL::SQL-GET-FROM-CLCN-NTH (0 "my key" #<SQL-STORE- 
> CONTROLLER (SQLITE3 my-db.db)> 0)
>   4: CLOS::CACHE-MISS-FUNCTION (:INVISIBLEP T &REST ("my key" #<SQL- 
> BTREE oid:0>))
>   5: (SUBFUNCTION 1 (METHOD CLOS::UPDATE-DISCRIMINATOR-CODE  
> (STANDARD-GENERIC-FUNCTION))) (:INVISIBLEP T &REST ("my key" #<SQL- 
> BTREE oid:0>))
>   6: SYSTEM::%INVOKE NIL
>   7: SYSTEM::%EVAL ((GET-FROM-ROOT "my key"))
>   8: EVAL ((GET-FROM-ROOT "my key"))
>   9: SWANK::EVAL-REGION ("(get-from-root \"my key\")
>      ")
>  10: (SUBFUNCTION 1 SWANK::REPL-EVAL) NIL
>  11: SWANK::TRACK-PACKAGE (#<Closure (SWANK::REPL-EVAL . 1) 21B6B7E2>)
>  12: SWANK::CALL-WITH-BUFFER-SYNTAX (#<Closure (SWANK::REPL-EVAL .  
> 1) 21B6B7CA>)
>  13: SWANK::REPL-EVAL ("(get-from-root \"my key\")
>      ")
>  14: SYSTEM::%INVOKE NIL
>
> ..... Lots more stuff ....
>
> Any ideas what I'm doing wrong?
>
> Thanks in advance,
>
> Anthony
>
> _______________________________________________
> elephant-devel site list
> elephant-devel at common-lisp.net
> http://common-lisp.net/mailman/listinfo/elephant-devel