From: Russ Tyndall <russ@acceleration.net>
Date: Mon, 4 Nov 2013 17:33:06 +0000 (-0500)
Subject: added better debugging info when failing to load foreign library
X-Git-Tag: v6.5.0~17
X-Git-Url: http://git.kpe.io/?p=clsql.git;a=commitdiff_plain;h=0b757e652eda05d8d824438d925665f17e764d93;hp=2fb4a4ccc311f37b0f5e993976a4d7d4f667f4e3

added better debugging info when failing to load foreign library
---

diff --git a/uffi/clsql-uffi-loader.lisp b/uffi/clsql-uffi-loader.lisp
index 7d1ebec..6a286a9 100644
--- 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
-       (error "Couldn't load foreign librar~@P ~{~S~^, ~}. (searched ~S)"
+       (error "Couldn't load foreign librar~@P ~{~S~^, ~}. (searched ~S: ~S)"
               (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*