From: Nikodemus S. <de...@us...> - 2008-10-18 10:28:11
|
Update of /cvsroot/sbcl/sbcl In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv27120 Modified Files: NEWS version.lisp-expr Log Message: 1.0.21.27: no more &OPTIONAL-DISPATCH debug names * IR1-CONVERT-HAIRY-LAMBDA used to give optional dispatch entry points `(&OPTIONAL-DISPATCH ,(OR <DEBUG-NAME> <SOURCE-NAME>)) as debug-name. Don't do that -- just use the provided DEBUG-NAME directly (it's NIL in the cases we most care about, leaving the functional with just a source-name). This fixes two issues: 1. Functions with non-required arguments didn't get the derived type information saved in the infodb. FINALIZE-XEP-DEFINITION didn't set the INFO entries properly because (eq (leaf-source-name leaf) (functional-debug-name leaf)) was false -- it's true only if there is no separate debug-name. 2. Functions with non-required arguments printed as #<FUNCTION (SB-C::&OPTIONAL-DISPATCH READ-LINE) {10AD8345}> because non-NIL debug-name is preferred over the source-name. * Test-cases. Index: NEWS =================================================================== RCS file: /cvsroot/sbcl/sbcl/NEWS,v retrieving revision 1.1410 retrieving revision 1.1411 diff -u -d -r1.1410 -r1.1411 --- NEWS 18 Oct 2008 08:22:16 -0000 1.1410 +++ NEWS 18 Oct 2008 10:27:58 -0000 1.1411 @@ -37,6 +37,10 @@ * bug fix: COMPILE-FILE did not warn about undefined variable references at toplevel, and LOAD of the resulting fasl did not signal an error. + * bug fix: functions with non-required arguments used to end up with + (SB-C::&OPTIONAL-DISPATCH ...) as their name. + * bug fix: redefining a function with non-required arguments didn't + update the system's knowledge about its call signature properly. changes in sbcl-1.0.21 relative to 1.0.20: * new feature: the compiler is able to track the effective type of a Index: version.lisp-expr =================================================================== RCS file: /cvsroot/sbcl/sbcl/version.lisp-expr,v retrieving revision 1.4129 retrieving revision 1.4130 diff -u -d -r1.4129 -r1.4130 --- version.lisp-expr 18 Oct 2008 08:22:16 -0000 1.4129 +++ version.lisp-expr 18 Oct 2008 10:27:58 -0000 1.4130 @@ -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.21.26" +"1.0.21.27" |