From: Christophe Rhodes Date: Wed, 30 Jun 2004 20:43:08 +0000 (+0000) Subject: 0.8.12.13: X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=e60e0a31062e74719c29bbe16c7f1dede0fbc73a;p=sbcl.git 0.8.12.13: Fix for MAKE-LOAD-FORM-SAVING-SLOTS on conditions ... it's not required to work, which is why we hadn't noticed that it was totally broken. However, since it can work with minimal extra effort, might as well get it right. --- diff --git a/src/pcl/braid.lisp b/src/pcl/braid.lisp index 9aec60e..0c62370 100644 --- a/src/pcl/braid.lisp +++ b/src/pcl/braid.lisp @@ -578,8 +578,8 @@ `(:initfunction ,form-or-fun) `(:initform ,form-or-fun :initfunction ,(lambda () form-or-fun))))) - :allocation (condition-slot-allocation slot) - :documentation (condition-slot-documentation slot)))) + :allocation ,(condition-slot-allocation slot) + :documentation ,(condition-slot-documentation slot)))) (cond ((structure-type-p name) (ensure 'structure-class (mapcar #'slot-initargs-from-structure-slotd diff --git a/version.lisp-expr b/version.lisp-expr index e81dfd4..6993d25 100644 --- 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.12.12" +"0.8.12.13"