X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=db-odbc%2Fodbc-loader.lisp;h=52dc8f7c36936a37d32e45ed62ebbc1376f93e27;hb=a3112fd970a6f59efae544e9d939a50f1c1f7b23;hp=45bb6ffd908e3cb8ca08109244607ae63a6616d4;hpb=9bbed78051e80e6ab76ae47834136035602bbbf1;p=clsql.git diff --git a/db-odbc/odbc-loader.lisp b/db-odbc/odbc-loader.lisp index 45bb6ff..52dc8f7 100644 --- a/db-odbc/odbc-loader.lisp +++ b/db-odbc/odbc-loader.lisp @@ -22,6 +22,7 @@ (uffi:find-foreign-library '("odbc32" "libodbc" "libiodbc") `(,(make-pathname :directory (pathname-directory *load-truename*)) + #+64bit "/usr/lib64/" "/usr/lib/" "/sw/lib/" "/usr/local/lib/" @@ -38,15 +39,15 @@ set to the right path before compiling or loading the system.") (defvar *odbc-library-loaded* nil "T if foreign library was able to be loaded successfully") -(defmethod clsql-base:database-type-library-loaded ((database-type (eql :odbc))) +(defmethod clsql-sys:database-type-library-loaded ((database-type (eql :odbc))) *odbc-library-loaded*) -(defmethod clsql-base:database-type-load-foreign ((database-type (eql :odbc))) +(defmethod clsql-sys:database-type-load-foreign ((database-type (eql :odbc))) (uffi:load-foreign-library *odbc-library-path* :module "odbc") (setq *odbc-library-loaded* t)) -(clsql-base:database-type-load-foreign :odbc) +(clsql-sys:database-type-load-foreign :odbc)