X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=src%2Flibraries.lisp;h=5378deb77c1ed44cb9518819c66c74978bc78151;hb=1e5809bc5e68d9f1f5a676fa24253b3b95d490ac;hp=faa5f12c2ef44efab56d6f4f4a7bcd5bb3507352;hpb=88b6725ddf5bb4e3fdaaf1a5fc0e331d7371b41b;p=uffi.git

diff --git a/src/libraries.lisp b/src/libraries.lisp
index faa5f12..5378deb 100644
--- a/src/libraries.lisp
+++ b/src/libraries.lisp
@@ -20,9 +20,9 @@
 
 (defun default-foreign-library-type ()
   "Returns string naming default library type for platform"
-  #+(or win32 mswindows) "dll"
+  #+(or win32 cygwin mswindows) "dll"
   #+(or macosx darwin ccl-5.0) "dylib"
-  #-(or win32 mswindows macosx darwin ccl-5.0) "so"
+  #-(or win32 cygwin mswindows macosx darwin ccl-5.0) "so"
 )
 
 (defun foreign-library-types ()
@@ -45,9 +45,6 @@ library type if type is not specified."
   (unless (listp directories)
     (setq directories (list directories)))
   #+(or win32 mswindows)
-  (unless drive-letters
-    (setq drive-letters (list (pathname-device directories))))
-  #+(or win32 mswindows)
   (unless (listp drive-letters)
     (setq drive-letters (list drive-letters)))
   #-(or win32 mswindows)