From 0b757e652eda05d8d824438d925665f17e764d93 Mon Sep 17 00:00:00 2001 From: Russ Tyndall Date: Mon, 4 Nov 2013 12:33:06 -0500 Subject: [PATCH] added better debugging info when failing to load foreign library --- uffi/clsql-uffi-loader.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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* -- 2.34.1