0.8.14.12:

        * New bug.

diff --git a/BUGS b/BUGS
index 8fb3dc5..57305af 100644 (file)
--- a/BUGS
+++ b/BUGS
@@ -1596,3 +1596,16 @@ WORKAROUND:
     => (EXPT X 2)
   from CLHS entry for DEFINE-COMPILER-MACRO fails in 0.8.13.41 with an
   error. Fixed in CMUCL 19a.
+
+348:
+  Structure slot setters do not preserve evaluation order:
+
+    (defstruct foo (x))
+
+    (let ((i (eval '-2))
+          (x (make-foo)))
+      (funcall #'(setf foo-x)
+               (incf i)
+               (aref (vector x) (incf i)))
+      (foo-x x))
+    => error

diff --git a/version.lisp-expr b/version.lisp-expr
index 6b47397..d028610 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.8.14.11"
+"0.8.14.12"