0.9.7.34:

        * New bug.

diff --git a/BUGS b/BUGS
index ac698a4..0a4436a 100644 (file)
--- a/BUGS
+++ b/BUGS
@@ -2100,3 +2100,15 @@ WORKAROUND:
      instead errors.
 
      (reported on sbcl-help by "tichy")
+
+396: block-compilation bug
+    (let ((x 1))
+      (dotimes (y 10)
+        (let ((y y))
+          (when (funcall (eval #'(lambda (x) (eql x 2))) y)
+            (defun foo (z)
+              (incf x (incf y z))))))
+      (defun bar (z)
+        (foo z)
+        (values x)))
+  (bar 1) => 11, should be 4.

diff --git a/doc/manual/ffi.texinfo b/doc/manual/ffi.texinfo
index 73871eb..f8ffb73 100644 (file)
--- a/doc/manual/ffi.texinfo
+++ b/doc/manual/ffi.texinfo
@@ -359,7 +359,7 @@ array type. @code{deref} can be set with @code{setf} to assign a new
 value.
 @end defun
 
-@defun sb-alien:slot @var{struct-or-union} &rest @var{slot-names}
+@defun sb-alien:slot @var{struct-or-union} @var{slot-name}
 @findex slot
 
 The @code{sb-alien:slot} function extracts the value of the slot named

diff --git a/src/code/foreign-load.lisp b/src/code/foreign-load.lisp
index 74ce213..86016be 100644 (file)
--- a/src/code/foreign-load.lisp
+++ b/src/code/foreign-load.lisp
@@ -88,7 +88,7 @@ determined using the library filename. Reloading may not work as
 expected if user or library-code has called dlopen on FILE.
 
 References to foreign symbols in loaded shared objects do not survive
-intact through SB-EXT:SAVE-LISP-AND die on all platforms. See
+intact through SB-EXT:SAVE-LISP-AND-DIE on all platforms. See
 SB-EXT:SAVE-LISP-AND-DIE for details."
   (sb!thread:with-mutex (*foreign-lock*)
     (let* ((filename (or (unix-namestring file) file))

diff --git a/src/compiler/dump.lisp b/src/compiler/dump.lisp
index 1ad330c..24cee41 100644 (file)
--- a/src/compiler/dump.lisp
+++ b/src/compiler/dump.lisp
@@ -925,7 +925,7 @@
   (let ((code (sb!xc:char-code char)))
     (cond
       ((< code 256)
-  (dump-fop 'fop-short-character file)
+       (dump-fop 'fop-short-character file)
        (dump-byte code file))
       (t
        (dump-fop 'fop-character file)

diff --git a/version.lisp-expr b/version.lisp-expr
index 8e15fc7..7538803 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".)
-"0.9.7.33"
+"0.9.7.34"