;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
;;;; *************************************************************************
;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
;;;; *************************************************************************
`(,(make-pathname :directory (pathname-directory *load-truename*))
"/usr/lib/clsql/"
"/opt/lisp/clsql/uffi/"
"/home/kevin/debian/src/clsql/uffi/")
`(,(make-pathname :directory (pathname-directory *load-truename*))
"/usr/lib/clsql/"
"/opt/lisp/clsql/uffi/"
"/home/kevin/debian/src/clsql/uffi/")
(defvar *clsql-uffi-supporting-libraries* '("c")
"Used only by CMU. List of library flags needed to be passed to ld to
(defvar *clsql-uffi-supporting-libraries* '("c")
"Used only by CMU. List of library flags needed to be passed to ld to
(if (uffi:load-foreign-library *clsql-uffi-library-filename*
:module "clsql-uffi"
:supporting-libraries
*clsql-uffi-supporting-libraries*)
(setq *uffi-library-loaded* t)
(if (uffi:load-foreign-library *clsql-uffi-library-filename*
:module "clsql-uffi"
:supporting-libraries
*clsql-uffi-supporting-libraries*)
(setq *uffi-library-loaded* t)