1.0.14.6: SIMPLE-REFERENCE-ERROR, not SIMPLE-REFERENCE-CONDITION

 * Bogus export, reported by Attila Lendvai.

 * Fix the test-case to check that the condition type is sane, which
   would have caught this in the first place.

diff --git a/package-data-list.lisp-expr b/package-data-list.lisp-expr
index f69ef45..fd710df 100644 (file)
--- a/package-data-list.lisp-expr
+++ b/package-data-list.lisp-expr
@@ -855,7 +855,7 @@ possibly temporariliy, because it might be used internally."
                "SIMPLE-PARSE-ERROR" "SIMPLE-PROGRAM-ERROR"
                "SIMPLE-READER-ERROR"
                "SIMPLE-READER-PACKAGE-ERROR"
-               "SIMPLE-REFERENCE-CONDITION"
+               "SIMPLE-REFERENCE-ERROR"
                "SIMPLE-STREAM-ERROR"
                "SIMPLE-STORAGE-CONDITION"
                "SIMPLE-STYLE-WARNING"

diff --git a/tests/mop.impure.lisp b/tests/mop.impure.lisp
index 6a49d02..c362778 100644 (file)
--- a/tests/mop.impure.lisp
+++ b/tests/mop.impure.lisp
@@ -525,6 +525,6 @@
 (defclass has-slots-but-isnt-finalized () (a b c))
 (let ((class (find-class 'has-slots-but-isnt-finalized)))
   (assert (not (sb-mop:class-finalized-p class)))
-  (assert (raises-error? (sb-mop:class-slots class))))
+  (assert (raises-error? (sb-mop:class-slots class) sb-kernel::reference-condition)))
 \f
 ;;;; success

diff --git a/version.lisp-expr b/version.lisp-expr
index ba76545..0cacfe1 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.14.5"
+"1.0.14.6"