Mercurial > hg > xemacs-beta
changeset 4104:23d7fde3d773
[xemacs-hg @ 2007-08-08 14:54:41 by aidan]
Merge a bug fix from Sebastian Freundt's SXEmacs work.
author | aidan |
---|---|
date | Wed, 08 Aug 2007 14:54:43 +0000 |
parents | b4f4e0cc90f1 |
children | e91cf17f6ab7 |
files | src/ChangeLog src/eval.c |
diffstat | 2 files changed, 15 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog Tue Aug 07 23:09:22 2007 +0000 +++ b/src/ChangeLog Wed Aug 08 14:54:43 2007 +0000 @@ -1,3 +1,12 @@ +2007-08-08 Aidan Kehoe <kehoea@parhasard.net> + + * eval.c (Feval): Fix, stick with original error messages instead + of referring to the indirected function. + + From Sebastian Freundt's mail + nhtfy9sitjf.fsf@muck.math.tu-berlin.de , Tue Jan 30 12:30:07 UTC + 2007; complements 18005.16378.980760.860724@parhasard.net . + 2007-07-31 Mike Sperber <mike@xemacs.org> * file-coding.c (undecided_convert): Kludge to prevent infinite
--- a/src/eval.c Tue Aug 07 23:09:22 2007 +0000 +++ b/src/eval.c Wed Aug 08 14:54:43 2007 +0000 @@ -3799,7 +3799,12 @@ goto invalid_function; } } - else /* ! (SUBRP (fun) || COMPILED_FUNCTIONP (fun) || CONSP (fun)) */ + else if (UNBOUNDP (fun)) + { + val = signal_void_function_error (original_fun); + } + else /* ! (SUBRP (fun) || COMPILED_FUNCTIONP (fun) || CONSP (fun) + UNBOUNDP (fun)) */ { invalid_function: val = signal_invalid_function_error (fun);