(when errorp
(error "Couldn't load foreign librar~@P ~{~S~^, ~}. (searched ~S)"
(length filenames) filenames
'clsql:*foreign-library-search-paths*)))))
(when errorp
(error "Couldn't load foreign librar~@P ~{~S~^, ~}. (searched ~S)"
(length filenames) filenames
'clsql:*foreign-library-search-paths*)))))