1.0.21.35: fix build / SAVE-LISP-AND-DIE on non-GENCGC platforms

 * Move back SAVE outside the WHEN in SAVE-LISP-AND-DIE. Thanks to
   Bruce O'Neel.

diff --git a/src/code/save.lisp b/src/code/save.lisp
index c7b5b6d..486bc97 100644 (file)
--- a/src/code/save.lisp
+++ b/src/code/save.lisp
@@ -137,12 +137,12 @@ sufficiently motivated to do lengthy fixes."
                ;; since the GC will invalidate the stack.
                #!+gencgc (gc-and-save (unix-namestring core-file-name nil)
                                       (foreign-bool executable)
-                                      (foreign-bool save-runtime-options))
+                                      (foreign-bool save-runtime-options)))
              (without-gcing
               (save (unix-namestring core-file-name nil)
                     (get-lisp-obj-address #'restart-lisp)
                     (foreign-bool executable)
-                    (foreign-bool save-runtime-options))))))
+                    (foreign-bool save-runtime-options)))))
     ;; Save the restart function into a static symbol, to allow GC-AND-SAVE
     ;; access to it even after the GC has moved it.
     #!+gencgc

diff --git a/version.lisp-expr b/version.lisp-expr
index c294b05..a713ab6 100644 (file)
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -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".)
-"1.0.21.34"
+"1.0.21.35"