CVS: sbcl/src/runtime coreparse.c,1.21,1.22 dynbind.c,1.8,1.9 run-program.c,1.5,1.6 save.c,1.17,1.18 thread.c,1.23,1.24 wrap.c,1.12,1.13

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

Modified Files:
        coreparse.c dynbind.c run-program.c save.c thread.c wrap.c 
Log Message:
0.8.9.8:
        Remove some warnings (Perry Metzinger sbcl-devel 2004-03-30
        "some anti-warning patches")
        ... also improve the comment above extern char **environ
        Add required exit clause to load.impure.lisp


Index: coreparse.c
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/runtime/coreparse.c,v
retrieving revision 1.21
retrieving revision 1.22
diff -u -d -r1.21 -r1.22
--- coreparse.c 20 Feb 2004 18:15:20 -0000      1.21
+++ coreparse.c 30 Mar 2004 11:19:53 -0000      1.22
@@ -16,6 +16,7 @@
 
 #include <stdio.h>
 #include <stdlib.h>
+#include <string.h>
 #include <sys/file.h>
 #include <sys/types.h>
 #include <sys/stat.h>

Index: dynbind.c
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/runtime/dynbind.c,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -d -r1.8 -r1.9
--- dynbind.c   18 Sep 2003 21:09:09 -0000      1.8
+++ dynbind.c   30 Mar 2004 11:19:57 -0000      1.9
@@ -35,7 +35,9 @@
     lispobj old_tl_value;
     struct binding *binding;
     struct thread *thread=(struct thread *)th;
+#ifdef LISP_FEATURE_SB_THREAD
     struct symbol *sym=(struct symbol *)native_pointer(symbol);
+#endif
     binding = GetBSP();
     SetBSP(binding+1);
 #ifdef LISP_FEATURE_SB_THREAD

Index: run-program.c
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/runtime/run-program.c,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- run-program.c       26 Feb 2003 02:28:36 -0000      1.5
+++ run-program.c       30 Mar 2004 11:19:57 -0000      1.6
@@ -19,9 +19,7 @@
 #include <sys/stat.h>
 #include <fcntl.h>
 #include <sys/ioctl.h>
-#if defined(SVR4) || defined(__linux__)
 #include <unistd.h>
-#endif
 
 #include <sys/ioctl.h>
 #include <termios.h>

Index: save.c
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/runtime/save.c,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -d -r1.17 -r1.18
--- save.c      20 Feb 2004 18:15:20 -0000      1.17
+++ save.c      30 Mar 2004 11:19:57 -0000      1.18
@@ -11,6 +11,7 @@
 
 #include <stdlib.h>
 #include <stdio.h>
+#include <string.h>
 #include <signal.h>
 #include <sys/file.h>
 

Index: thread.c
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/runtime/thread.c,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -d -r1.23 -r1.24
--- thread.c    29 Jan 2004 04:09:53 -0000      1.23
+++ thread.c    30 Mar 2004 11:19:57 -0000      1.24
@@ -1,5 +1,6 @@
 #include <stdlib.h>
 #include <stdio.h>
+#include <string.h>
 #include <sched.h>
 #include <signal.h>
 #include <stddef.h>

Index: wrap.c
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/runtime/wrap.c,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -d -r1.12 -r1.13
--- wrap.c      3 Oct 2003 12:20:00 -0000       1.12
+++ wrap.c      30 Mar 2004 11:19:57 -0000      1.13
@@ -36,8 +36,10 @@
 #include "sbcl.h"
 #include "util.h"
 
-/* KLUDGE: Neither the OpenBSD nor the Linux man page give a header
- * file to find this in (?). -- WHN 2002-02-07 */
+/* Although it might seem as though this should be in some standard
+   Unix header, according to Perry E. Metzger, in a message on
+   sbcl-devel dated 2004-03-29, this is the POSIXly-correct way of
+   using environ: by an explicit declaration.  -- CSR, 2004-03-30 */
 extern char **environ;
    
 /*



-------------------------------------------------------
This SF.Net email is sponsored by: IBM Linux Tutorials
Free Linux tutorial presented by Daniel Robbins, President and CEO of
GenToo technologies. Learn everything from fundamentals to system
administration.http://ads.osdn.com/?ad_id=1470&alloc_id=3638&op=click