[Sbcl-commits] CVS: sbcl/src/runtime wrap.c,1.20,1.21

[Nikodemus S. <de...@us...>]

Update of /cvsroot/sbcl/sbcl/src/runtime
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28488/src/runtime

Modified Files:
	wrap.c 
Log Message:
0.9.11.31: misc win32 improvements
  * Check for correct "expand" in canonicalize-whitespace, and skip
     canonicalization if it doesn't seem right. (Windows "expand" is
     something quite different.)
  * RUN-PROGRAM now always returns a process structure, which reports
     the exit-code of the process when :WAIT was true. :WAIT nil
     process-structures still keep their :RUNNING status indefinitely
     on Windows, though.
  * FIND-EXECUTABLE-IN-SEARCH-PATH actually searches the path, and adds
     "exe" as :TYPE if :TYPE is missing on Windows.
  * ASDF:RUN-SHELL-COMMAND searches for Bourne-shell on Windows, as there
     is no default location.
  * SB-GROVEL directly runs gcc and the groveler instead of indirecting 
     via shell, and the groveler directly writes to the lisp-file instead
     of via stdout and shell redirection.
  * Hack SB-POSIX till it builds and passes all applicable tests on Windows. 
     Mostly this involved plenty of #-win32, but a few tests needed to
     be adjusted for the delication Microsoft constitution.
  * Implement COPY-STREAM in ASDF-INSTALL so that it doesn't have to
     depend on SB-EXECUTABLE.
  * Take the .exe suffix into account when installing over an old SBCL
     on MSYS.
  * Adjust UNPARSE-NATIVE-WIN32-NAMESTRING slightly: Windows OS functions
     like stat don't like to have directory names ending with a slash.

This is good enough to run unpatched Slime with *COMMUNICATION-STYLE*
NIL, and build & pass tests with all contribs except SB-SIMPLE-STREAMS.



Index: wrap.c
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/runtime/wrap.c,v
retrieving revision 1.20
retrieving revision 1.21
diff -u -d -r1.20 -r1.21
--- wrap.c	7 Mar 2006 12:04:27 -0000	1.20
+++ wrap.c	13 Apr 2006 22:52:57 -0000	1.21
@@ -452,9 +452,9 @@
 int wstopsig(int status) {
     return WSTOPSIG(status);
 }
-
 /* FIXME: POSIX also defines WIFCONTINUED, but that appears not to
    exist on at least Linux... */
+#endif  /* !LISP_FEATURE_WIN32 */
 
 /* From SB-POSIX, stat-macros */
 int s_isreg(mode_t mode)
@@ -477,6 +477,7 @@
 {
     return S_ISFIFO(mode);
 }
+#ifndef LISP_FEATURE_WIN32
 int s_islnk(mode_t mode)
 {
 #ifdef S_ISLNK