Commit 090a072f authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(Fsignal): Handle case that backtrace_list is null.

parent d7e1fe1f
2000-07-07 Gerd Moellmann <gerd@gnu.org>
* eval.c (Fsignal): Handle case that backtrace_list is null.
2000-07-07 Kenichi Handa <handa@etl.go.jp>
 
* ccl.c (Fccl_execute): Typo fixed.
......
......@@ -1328,10 +1328,15 @@ See also the function `condition-case'.")
/* Remember from where signal was called. Skip over the frame for
`signal' itself. If a frame for `error' follows, skip that,
too. */
bp = backtrace_list->next;
if (bp && bp->function && EQ (*bp->function, Qerror))
bp = bp->next;
Vsignaling_function = bp && bp->function ? *bp->function : Qnil;
Vsignaling_function = Qnil;
if (backtrace_list)
{
bp = backtrace_list->next;
if (bp && bp->function && EQ (*bp->function, Qerror))
bp = bp->next;
if (bp && bp->function)
Vsignaling_function = *bp->function;
}
for (; handlerlist; handlerlist = handlerlist->next)
{
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment