;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
;;;; *************************************************************************
-(in-package :clsql-sqlite)
+(in-package #:clsql-sqlite)
(defvar *sqlite-supporting-libraries* '("c")
"Used only by CMU. List of library flags needed to be passed to ld
#-clisp
(let ((libpath (uffi:find-foreign-library
"libsqlite"
- '("/usr/lib/" "/usr/local/lib/")
+ '(#+64bit "/usr/lib64/"
+ "/usr/lib/" "/usr/local/lib/")
:drive-letters '("C" "D" "E"))))
(if (uffi:load-foreign-library libpath
:module "sqlite"
(setq *sqlite-library-loaded* t)
(warn "Can't load SQLite library ~A" libpath))))
-(clsql-base-sys:database-type-load-foreign :sqlite)
+(clsql-sys:database-type-load-foreign :sqlite)