projects
/
clsql.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
2fb4a4c
)
added better debugging info when failing to load foreign library
author
Russ Tyndall
<russ@acceleration.net>
Mon, 4 Nov 2013 17:33:06 +0000
(12:33 -0500)
committer
Russ Tyndall
<russ@acceleration.net>
Mon, 4 Nov 2013 17:33:06 +0000
(12:33 -0500)
uffi/clsql-uffi-loader.lisp
patch
|
blob
|
history
diff --git
a/uffi/clsql-uffi-loader.lisp
b/uffi/clsql-uffi-loader.lisp
index 7d1ebec151f5da36569101544957b07dd7300e47..6a286a945e342eba0288912d7558fdc494e6bc87 100644
(file)
--- a/
uffi/clsql-uffi-loader.lisp
+++ b/
uffi/clsql-uffi-loader.lisp
@@
-37,9
+37,9
@@
well as any of the filenames in any of the clsql:*foreign-library-search-paths*"
(loop for search-path in clsql:*foreign-library-search-paths*
thereis (try-load (merge-pathnames pn search-path))))))
(when errorp
(loop for search-path in clsql:*foreign-library-search-paths*
thereis (try-load (merge-pathnames pn search-path))))))
(when errorp
- (error "Couldn't load foreign librar~@P ~{~S~^, ~}. (searched ~S)"
+ (error "Couldn't load foreign librar~@P ~{~S~^, ~}. (searched ~S
: ~S
)"
(length filenames) filenames
(length filenames) filenames
- 'clsql:*foreign-library-search-paths*)))))
+ 'clsql:*foreign-library-search-paths*
clsql:*foreign-library-search-paths*
)))))
;; searches clsql_uffi64 to accomodate both 32-bit and 64-bit libraries on same system
(defvar *clsql-uffi-library-filenames*
;; searches clsql_uffi64 to accomodate both 32-bit and 64-bit libraries on same system
(defvar *clsql-uffi-library-filenames*