X-Git-Url: https://git.distorted.org.uk/~mdw/clg/blobdiff_plain/d4f4418a3709df05aae88e08f6e56b0bf60b7a4f..34abe734976bd58ceee345f5f6d1ad1a914acfc3:/tools/asdf-extensions.lisp

diff --git a/tools/asdf-extensions.lisp b/tools/asdf-extensions.lisp
index 93be2d3..14a4db7 100644
--- a/tools/asdf-extensions.lisp
+++ b/tools/asdf-extensions.lisp
@@ -1,6 +1,9 @@
 (in-package :asdf)
 
-(export 'load-dso)
+(export '*dso-extension*)
+
+(defvar *dso-extension* #-darwin"so" #+darwin"dylib")
+
 
 (defun concatenate-strings (strings &optional delimiter)
   (if (not (rest strings))
@@ -27,7 +30,7 @@
 (defmethod output-files ((operation compile-op) (dso unix-dso))
   (let ((dir (component-pathname dso)))
     (list
-     (make-pathname :type "so"
+     (make-pathname :type *dso-extension*
 		    :name (car (last (pathname-directory dir)))
 		    :directory (butlast (pathname-directory dir))
 		    :defaults dir))))
@@ -125,7 +128,7 @@
 
 
 (defmethod component-pathname ((lib library))
-  (make-pathname :type "so"
+  (make-pathname :type *dso-extension*
 		 :name (component-name lib)
 		 :directory (split-path (slot-value lib 'libdir))))