r8270: fix loading on non-linux platforms
authorKevin M. Rosenberg <kevin@rosenberg.net>
Tue, 25 Nov 2003 06:37:14 +0000 (06:37 +0000)
committerKevin M. Rosenberg <kevin@rosenberg.net>
Tue, 25 Nov 2003 06:37:14 +0000 (06:37 +0000)
clsql-mysql.asd
db-mysql/mysql-loader.lisp
debian/changelog

index ec4e5efea6c9de6c7c2004dac2989c4817adb585..815709e6a20773e19789990347bb17e3019b627b 100644 (file)
   ())
 
 (defmethod output-files ((o compile-op) (c clsql-mysql-source-file))
-  (let ((found (some #'(lambda (dir)
+  (let* ((library-file-type
+         (funcall (intern (symbol-name'#:default-foreign-library-type)
+                          (symbol-name '#:uffi))))
+         (found (some #'(lambda (dir)
                            (probe-file (make-pathname :directory dir
                                                       :name (component-name c)
-                                                      :type "so")))
+                                                      :type library-file-type)))
                        '((:absolute "usr" "lib" "clsql"))))) 
     (list (if found
              found
              (make-pathname :name (component-name c)
-                            :type "so"
+                            :type library-file-type
                             :directory *library-file-dir*)))))
 
 (defmethod perform ((o load-op) (c clsql-mysql-source-file))
index db401500c41bbbbc931191b6458dd17c695e47c9..cafa2e6c821a625d028f56959e86bd851b0f8ece 100644 (file)
@@ -16,7 +16,6 @@
 ;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
 ;;;; *************************************************************************
 
-(declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0)))
 (in-package :mysql)
 
 ;;;; Modified by Kevin Rosenberg 
index 801e2f9704a3ffe005f4ce6d5220bc9ccd77493d..cc1bc258010eca913290034916023e55d808f771 100644 (file)
@@ -1,3 +1,9 @@
+cl-sql (1.8.5-1) unstable; urgency=low
+
+  * Fix loading on db-mysql/mysql.so on non-linux platforms
+
+ -- Kevin M. Rosenberg <kmr@debian.org>  Mon, 24 Nov 2003 23:17:25 -0700
+
 cl-sql (1.8.4-1) unstable; urgency=low
 
   * Fix typo in error string