X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=uffi%2Fclsql-uffi-loader.lisp;fp=uffi%2Fclsql-uffi-loader.lisp;h=a8f7173a84ea4657004f40a9f4fec9f75426e7b8;hp=c667746e0f3a6034cf044aeedf8e269ba2b7c2f9;hb=b31836193ceb646fa6e4fd7761dff378a9c67385;hpb=87f839b47a246d3fff14d3ad70661a4ff66fd839 diff --git a/uffi/clsql-uffi-loader.lisp b/uffi/clsql-uffi-loader.lisp index c667746..a8f7173 100644 --- a/uffi/clsql-uffi-loader.lisp +++ b/uffi/clsql-uffi-loader.lisp @@ -20,7 +20,7 @@ (defvar *clsql-uffi-library-filename* (uffi:find-foreign-library - "clsql-uffi" + "uffi" `(,(make-pathname :directory (pathname-directory *load-truename*)) "/usr/lib/clsql/" "/opt/lisp/clsql/uffi/" @@ -37,7 +37,7 @@ set to the right path before compiling or loading the system.") (defun load-uffi-foreign-library () (unless (probe-file *clsql-uffi-library-filename*) - (error "Unable to find clsql-uffi.so")) + (error "Unable to find uffi.so")) (if (uffi:load-foreign-library *clsql-uffi-library-filename* :module "clsql-uffi" @@ -48,5 +48,3 @@ set to the right path before compiling or loading the system.") (load-uffi-foreign-library) - -