- (uffi:find-foreign-library "z"
- `(,(pathname-directory *load-pathname*)))
+ (uffi:find-foreign-library
+ "z" (list (pathname-directory *load-pathname*)))
(unless (uffi:load-foreign-library
(uffi:find-foreign-library "uffi-c-test-lib"
(list
(pathname-directory *load-truename*)
"/usr/lib/uffi/"))
(unless (uffi:load-foreign-library
(uffi:find-foreign-library "uffi-c-test-lib"
(list
(pathname-directory *load-truename*)
"/usr/lib/uffi/"))