clsql 5.1.1 with sqlite3 failing on OSX 64bit ccl
JT Klein <[email protected]> Thu, 5 Aug 2010 21:01:22 +0000 (UTC)
| Newsgroups | gmane.lisp.clsql.general |
|---|---|
| Message-ID | <[email protected]> |
Hello,
I'm trying to use clsql 5.1.1 with uffi 2.0.0 on ccl 1.4-r13199 X8664.
It seems to be using the sqlite3.dylib present in /usr/lib
This is what happens:
ccl> (clsql:create-database '("./foo.db") :database-type :sqlite3)
T
ccl> (clsql:with-database (db '("./foo.db") :database-type :sqlite3)
(clsql:list-tables :database db))
NIL
ccl> (clsql:with-database (db '("./foo.db") :database-type :sqlite3)
(clsql:create-view-from-class 'user :database db))
ccl> (clsql:with-database (db '("./foo.db") :database-type :sqlite3)
(clsql:list-tables :database db))
value NIL is not of the expected type (UNSIGNED-BYTE 56).
[Condition of type TYPE-ERROR]
Restarts:
0: [RETRY] Retry SLIME REPL evaluation request.
1: [ABORT] Return to SLIME's top level.
2: [ABORT-BREAK] Reset this thread
3: [ABORT] Kill this thread
Backtrace:
0: (CCL:%STR-FROM-PTR #<A Foreign Pointer #x10135E0> NIL NIL)
1: ((:INTERNAL CLSQL-SQLITE3::EXTRACT-ROW-DATA (CLSQL-SYS:DATABASE-QUERY
(T CLSQL-SQLITE3:SQLITE3-DATABASE T T))))
2: (#<STANDARD-METHOD CLSQL-SYS:DATABASE-QUERY
(T CLSQL-SQLITE3:SQLITE3-DATABASE T T)> "SELECT name FROM sqlite_master
WHERE type='table' UNION ALL SELECT name FROM sqlite_temp_master
WHERE type='table' ..
3: (CCL::%%STANDARD-COMBINED-METHOD-DCODE ((#<STANDARD-METHOD
CLSQL-SYS:DATABASE-QUERY :BEFORE (T CLSQL-SYS:DATABASE T T)>)
NIL ..) 8346325)
4: (NIL #<Unknown Arguments>)
5: (#<STANDARD-METHOD CLSQL-SYS:DATABASE-LIST-TABLES-AND-SEQUENCES
(CLSQL-SQLITE3:SQLITE3-DATABASE)> #<SQLITE3-DATABASE ./foo.db
OPEN #x3000428B17DD> :OWNER NIL)
6: (CCL::%%CHECK-KEYWORDS #(1 #(:OWNER) #<CCL:METHOD-FUNCTION
CLSQL-SYS:DATABASE-LIST-TABLES-AND-SEQUENCES
(CLSQL-SQLITE3:SQLITE3-DATABASE)>) 8346350)
7: (NIL #<Unknown Arguments>)
8: (#<STANDARD-METHOD CLSQL-SYS:DATABASE-LIST-TABLES
(CLSQL-SQLITE3:SQLITE3-DATABASE)> #<SQLITE3-DATABASE ./foo.db
OPEN #x3000428B17DD> :OWNER NIL)
9: (CCL::%%CHECK-KEYWORDS #(1 #(:OWNER) #<CCL:METHOD-FUNCTION
CLSQL-SYS:DATABASE-LIST-TABLES (CLSQL-SQLITE3:SQLITE3-DATABASE)>)
8346371)
10: (NIL #<Unknown Arguments>)
11: (#<Anonymous Function #x3000428B18CF>)
If I try to create the view again, it says that USER exists in it.