From: Christophe R. <cr...@us...> - 2005-11-18 17:12:54
|
Update of /cvsroot/sbcl/sbcl In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22729 Modified Files: NEWS version.lisp-expr Log Message: 0.9.6.51: Fix bug reported by Kalle Olavi Niemitalo on comp.lang.lisp ... create CONDITION-CLASSes for DEFINE-CONDITION forms eagerly. ... oh, but wait. CONDITION-CLASSes are already created as part of the reader/writer generation, for those condition classes with slots, in the (find-class condition) incantation of install-condition-fooer-function. ... and oh joy, reinitialize-instance on condition-classes removes accessors but does not add them again. Add a reinitialize-instance :after method to put them back. ... add a comment explaining that I have no idea what is meant to happen. (CMUCL has a bogus CLASS-DIRECT-SLOTS on condition instances, which explains somewhat why it seems to work there...) Index: NEWS =================================================================== RCS file: /cvsroot/sbcl/sbcl/NEWS,v retrieving revision 1.916 retrieving revision 1.917 diff -u -d -r1.916 -r1.917 --- NEWS 8 Nov 2005 20:31:34 -0000 1.916 +++ NEWS 18 Nov 2005 17:12:42 -0000 1.917 @@ -20,6 +20,9 @@ * bug fix: the dependent update protocol now works for generic functions. (thanks to Gerd Moellmann; reported by Bruno Haible and Pascal Costanza) + * bug fix: condition-class instances corresponding to + DEFINE-CONDITION forms are now created eagerly. (reported by + Kalle Olavi Niemitalo on comp.lang.lisp) * bug fix: floating point printing is more accurate in some circumstances. (thanks to Simon Alexander) * bug fix: *COMPILE-FILE-PATHNAME* now contains the user's pathname Index: version.lisp-expr =================================================================== RCS file: /cvsroot/sbcl/sbcl/version.lisp-expr,v retrieving revision 1.2566 retrieving revision 1.2567 diff -u -d -r1.2566 -r1.2567 --- version.lisp-expr 18 Nov 2005 12:28:40 -0000 1.2566 +++ version.lisp-expr 18 Nov 2005 17:12:45 -0000 1.2567 @@ -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.9.6.50" +"0.9.6.51" |