From 414b35ffb1a699cc6469f80d029b9c4a887373b2 Mon Sep 17 00:00:00 2001 From: Juho Snellman Date: Wed, 7 Mar 2007 05:20:27 +0000 Subject: [PATCH] 1.0.3.35: fix problem with backtraces showing NIL as the function name * Reported by Edi Weitz * Might also fix the debug.impure failures that some people have reported on BSDs --- NEWS | 4 +++- src/compiler/main.lisp | 4 +++- version.lisp-expr | 2 +- 3 files changed, 7 insertions(+), 3 deletions(-) diff --git a/NEWS b/NEWS index 2f5f147..037579f 100644 --- a/NEWS +++ b/NEWS @@ -8,7 +8,7 @@ changes in sbcl-1.0.4 relative to sbcl-1.0.3: platforms. * optimization: code using alien values with undeclared types is much faster. * optimization: the compiler is now able to open code SEARCH in more cases. - * optimization: more compact (thanks to Lutz Euler) + * optimization: more compact typechecks on x86-64 (thanks to Lutz Euler) * bug fix: >= and <= gave wrong results when used with NaNs. * bug fix: the #= and ## reader macros now interact reasonably with funcallable instances. @@ -21,6 +21,8 @@ changes in sbcl-1.0.4 relative to sbcl-1.0.3: non-base strings as arguments * bug fix: more consistent error output for fatal-compiler-warnings, like reader errors + * bug fix: functions with proper names were showing up as NIL in + backtraces (reported by Edi Weitz, regression in 1.0.2) changes in sbcl-1.0.3 relative to sbcl-1.0.2: * new platform: NetBSD/PPC. (thanks to Aymeric Vincent) diff --git a/src/compiler/main.lisp b/src/compiler/main.lisp index 168fe6f..d77ff04 100644 --- a/src/compiler/main.lisp +++ b/src/compiler/main.lisp @@ -977,7 +977,9 @@ (funcall #'ir1-convert-lambdalike definition :source-name name))) - (debug-name (debug-name 'tl-xep name)) + (debug-name (debug-name 'tl-xep + (or name + (functional-%source-name locall-fun)))) ;; Convert the XEP using the policy of the real ;; function. Otherwise the wrong policy will be used for ;; deciding whether to type-check the parameters of the diff --git a/version.lisp-expr b/version.lisp-expr index f96c6b1..9969a86 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".) -"1.0.3.34" +"1.0.3.35" -- 1.7.10.4