diff options
Diffstat (limited to 'src/eval.c')
| -rw-r--r-- | src/eval.c | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/src/eval.c b/src/eval.c index 1b481663f3d..7790b6638f2 100644 --- a/src/eval.c +++ b/src/eval.c | |||
| @@ -1398,7 +1398,16 @@ find_handler_clause (handlers, conditions, sig, data, debugger_value_ptr) | |||
| 1398 | } | 1398 | } |
| 1399 | 1399 | ||
| 1400 | if (wants_debugger (Vstack_trace_on_error, conditions)) | 1400 | if (wants_debugger (Vstack_trace_on_error, conditions)) |
| 1401 | internal_with_output_to_temp_buffer ("*Backtrace*", Fbacktrace, Qnil); | 1401 | { |
| 1402 | #ifdef __STDC__ | ||
| 1403 | internal_with_output_to_temp_buffer ("*Backtrace*", | ||
| 1404 | (Lisp_Object (*) (Lisp_Object)) Fbacktrace, | ||
| 1405 | Qnil); | ||
| 1406 | #else | ||
| 1407 | internal_with_output_to_temp_buffer ("*Backtrace*", | ||
| 1408 | Fbacktrace, Qnil); | ||
| 1409 | #endif | ||
| 1410 | } | ||
| 1402 | if ((EQ (sig_symbol, Qquit) | 1411 | if ((EQ (sig_symbol, Qquit) |
| 1403 | ? debug_on_quit | 1412 | ? debug_on_quit |
| 1404 | : wants_debugger (Vdebug_on_error, conditions)) | 1413 | : wants_debugger (Vdebug_on_error, conditions)) |