projects
/
clsql.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
r9433:
[clsql.git]
/
db-sqlite
/
sqlite-loader.lisp
diff --git
a/db-sqlite/sqlite-loader.lisp
b/db-sqlite/sqlite-loader.lisp
index 1cfcf21ffb675b52a20324907d5cb8be3bac6ff4..d6254737b26004984cfef4774b1d05438164de6f 100644
(file)
--- a/
db-sqlite/sqlite-loader.lisp
+++ b/
db-sqlite/sqlite-loader.lisp
@@
-37,7
+37,8
@@
set to the right path before compiling or loading the system.")
#-clisp
(let ((libpath (uffi:find-foreign-library
"libsqlite"
#-clisp
(let ((libpath (uffi:find-foreign-library
"libsqlite"
- '("/usr/lib/" "/usr/local/lib/")
+ '(#+64bit "/usr/lib64/"
+ "/usr/lib/" "/usr/local/lib/")
:drive-letters '("C" "D" "E"))))
(if (uffi:load-foreign-library libpath
:module "sqlite"
:drive-letters '("C" "D" "E"))))
(if (uffi:load-foreign-library libpath
:module "sqlite"
@@
-46,7
+47,7
@@
set to the right path before compiling or loading the system.")
(setq *sqlite-library-loaded* t)
(warn "Can't load SQLite library ~A" libpath))))
(setq *sqlite-library-loaded* t)
(warn "Can't load SQLite library ~A" libpath))))
-(clsql-
base
:database-type-load-foreign :sqlite)
+(clsql-
sys
:database-type-load-foreign :sqlite)