0.8.9.8:
authorChristophe Rhodes <csr21@cam.ac.uk>
Tue, 30 Mar 2004 11:19:52 +0000 (11:19 +0000)
committerChristophe Rhodes <csr21@cam.ac.uk>
Tue, 30 Mar 2004 11:19:52 +0000 (11:19 +0000)
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

src/runtime/coreparse.c
src/runtime/dynbind.c
src/runtime/run-program.c
src/runtime/save.c
src/runtime/thread.c
src/runtime/wrap.c
tests/load.impure.lisp
version.lisp-expr

index e01bf33..5cb6c64 100644 (file)
@@ -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 7b410c3..024b2fd 100644 (file)
@@ -35,7 +35,9 @@ void bind_variable(lispobj symbol, lispobj value, void *th)
     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 241db7f..5e3bd8f 100644 (file)
@@ -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 e901d98..ec630d5 100644 (file)
@@ -11,6 +11,7 @@
 
 #include <stdlib.h>
 #include <stdio.h>
+#include <string.h>
 #include <signal.h>
 #include <sys/file.h>
 
index e4e5664..3cfab33 100644 (file)
@@ -1,5 +1,6 @@
 #include <stdlib.h>
 #include <stdio.h>
+#include <string.h>
 #include <sched.h>
 #include <signal.h>
 #include <stddef.h>
index c472309..f12e896 100644 (file)
 #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;
 \f   
 /*
index b54b374..c9eab11 100644 (file)
@@ -33,3 +33,5 @@
              (assert (not (array-has-fill-pointer-p *array*)))))
       (when tmp-fasl (delete-file tmp-fasl))
       (delete-file *tmp-filename*))))
+
+(quit :unix-status 104)
index f1efc86..e880698 100644 (file)
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"0.8.9.7"
+"0.8.9.8"