0.pre8.113:

      * src/pcl/slots.lisp: change return value of slot-makunbound-using-class
      to OBJECT rather than NIL to conform to AMOP

diff --git a/src/pcl/slots.lisp b/src/pcl/slots.lisp
index e7c1d86..786ce4b 100644 (file)
--- a/src/pcl/slots.lisp
+++ b/src/pcl/slots.lisp
@@ -267,7 +267,7 @@
        (error "~@<The slot ~S has neither :INSTANCE nor :CLASS allocation, ~
               so it can't be written by the default ~S method.~@:>"
              slotd 'slot-makunbound-using-class))))
-  nil)
+  object)
 
 (defmethod slot-value-using-class
     ((class structure-class)

diff --git a/version.lisp-expr b/version.lisp-expr
index dd481f2..bd4502f 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.pre8.112"
+"0.pre8.113"