projects
/
clsql.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
r11653: documentation update
[clsql.git]
/
uffi
/
clsql-uffi-loader.lisp
diff --git
a/uffi/clsql-uffi-loader.lisp
b/uffi/clsql-uffi-loader.lisp
index 115209a9afda21a8de6af86f1c5b64be06fc7c98..47a1f6ad2f86e4f35b0dc9f57df8c3e51e9dc677 100644
(file)
--- a/
uffi/clsql-uffi-loader.lisp
+++ b/
uffi/clsql-uffi-loader.lisp
@@
-35,9
+35,9
@@
well as any of the filenames in any of the clsql:*foreign-library-search-paths*"
(loop for name in filenames
for pn = (make-pathname :name name :type type)
thereis (or
(loop for name in filenames
for pn = (make-pathname :name name :type type)
thereis (or
+ (try-load pn)
(loop for search-path in clsql:*foreign-library-search-paths*
(loop for search-path in clsql:*foreign-library-search-paths*
- thereis (try-load (merge-pathnames pn search-path)))
- (try-load pn))))
+ thereis (try-load (merge-pathnames pn search-path))))))
(when errorp
(error "Couldn't load foreign librar~@P ~{~S~^, ~}. (searched ~S)"
(length filenames) filenames
(when errorp
(error "Couldn't load foreign librar~@P ~{~S~^, ~}. (searched ~S)"
(length filenames) filenames