From 7e67824c7e99828b56acb72ed0b78f955ccb9adf Mon Sep 17 00:00:00 2001 From: William Harold Newman Date: Thu, 21 Nov 2002 21:12:08 +0000 Subject: [PATCH] 0.7.9.63: (Oops.) restored bug 226: I had deleted it from BUGS in my last commit thinking that it was just there because APD had forgotten to delete it, when in fact it was put back on purpose by APD in .60 when he unrolled his changes from .54. --- BUGS | 20 ++++++++++++++++++++ version.lisp-expr | 2 +- 2 files changed, 21 insertions(+), 1 deletion(-) diff --git a/BUGS b/BUGS index 2112237..ef9ea5e 100644 --- a/BUGS +++ b/BUGS @@ -1321,6 +1321,26 @@ WORKAROUND: (localy (declare (optimize (safety 3))) (ignore-errors (progn (values-list (car (list '(1 . 2)))) t))) + 226: "AVER failure in COMPILE-FILE of clocc-ansi-test/tests.lisp" + (APD points out that this seems to be another symptom of bug #115.) + sbcl-0.7.9.43 dies with failed AVER "(EQ (TN-PHYSENV TN) TN-ENV)" when + trying to compile clocc-ansi-test/tests.lisp. sbcl-0.7.9.31 was able to + to compile it. A smaller test case exhibiting the same problem is + (declaim (optimize (speed 0) (safety 3) (debug 3))) + (defun c-a-p () + (flet ((safe-format (stream string &rest r) + (unless (ignore-errors (progn + (apply #'format stream string r) + t)) + (format stream "~&foo ~S" string)))) + (cond + ((eq my-result :ERROR) + (cond + ((ignore-errors (typep condition result)) + (safe-format t "~&bar ~S" result)) + (t + (safe-format t "~&baz ~S (~A) ~S" condition condition result))))))) + 227: "compiler bewilderment with adjustable vectors and COPY-SEQ" In sbcl-0.7.9.54 on x86, (let ((v (make-array 0 :fill-pointer 0))) diff --git a/version.lisp-expr b/version.lisp-expr index 351d0bc..565f278 100644 --- a/version.lisp-expr +++ b/version.lisp-expr @@ -18,4 +18,4 @@ ;;; versions, especially for internal versions off the main CVS ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".) -"0.7.9.62" +"0.7.9.63" -- 1.7.10.4