[Euslisp-commit] SF.net SVN: euslisp:[647] trunk/EusLisp/lisp/comp/comp.l

[<ina...@us...>]

Revision: 647
          http://sourceforge.net/p/euslisp/code/647
Author:   inaba-jsk
Date:     2013-07-15 23:59:14 +0000 (Mon, 15 Jul 2013)
Log Message:
-----------
modify function definition of compile in comp.l based on Henry's report

Modified Paths:
--------------
    trunk/EusLisp/lisp/comp/comp.l

Modified: trunk/EusLisp/lisp/comp/comp.l
===================================================================
--- trunk/EusLisp/lisp/comp/comp.l	2013-06-29 07:57:20 UTC (rev 646)
+++ trunk/EusLisp/lisp/comp/comp.l	2013-07-15 23:59:14 UTC (rev 647)
@@ -1456,7 +1456,8 @@
       (setq pname (make-pathname :defaults fname :type "h"))
       (unix:unlink (namestring pname))
       (setq pname (make-pathname :defaults fname :type
-	#-:linux	"o"
+        #-(or :linux :cygwin) "o"
+        #+:cygwin       "dll"
 	#+:linux	"so"
 	))
       (load pname)

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.