X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=db-odbc%2Fodbc-loader.lisp;h=52dc8f7c36936a37d32e45ed62ebbc1376f93e27;hp=63e39d87d673dbe0c8ff4268dc162e3f8f8fa96e;hb=8a8ee2d7d791b7a3efaed06420802a925d16fca3;hpb=d107be8f0cad113b96b6cfe443cc4d7c08126db4 diff --git a/db-odbc/odbc-loader.lisp b/db-odbc/odbc-loader.lisp index 63e39d8..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-sys: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-sys: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-sys:database-type-load-foreign :odbc) +(clsql-sys:database-type-load-foreign :odbc)