X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=clsql-mysql.asd;h=815709e6a20773e19789990347bb17e3019b627b;hb=887f5e4047033c019c7f14d53e7c628dbc6e115d;hp=ec4e5efea6c9de6c7c2004dac2989c4817adb585;hpb=4661cdbb26de93d072226ab6cd9325c1ca7bb75e;p=clsql.git

diff --git a/clsql-mysql.asd b/clsql-mysql.asd
index ec4e5ef..815709e 100644
--- a/clsql-mysql.asd
+++ b/clsql-mysql.asd
@@ -26,15 +26,18 @@
   ())
 
 (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))