diff options
Diffstat (limited to 'src/eval.c')
| -rw-r--r-- | src/eval.c | 15 |
1 files changed, 7 insertions, 8 deletions
diff --git a/src/eval.c b/src/eval.c index 94b6214715a..8d446de09fc 100644 --- a/src/eval.c +++ b/src/eval.c | |||
| @@ -1945,14 +1945,13 @@ find_handler_clause (handlers, conditions, sig, data) | |||
| 1945 | { | 1945 | { |
| 1946 | max_lisp_eval_depth += 15; | 1946 | max_lisp_eval_depth += 15; |
| 1947 | max_specpdl_size++; | 1947 | max_specpdl_size++; |
| 1948 | #ifdef PROTOTYPES | 1948 | if (noninteractive) |
| 1949 | internal_with_output_to_temp_buffer ("*Backtrace*", | 1949 | Fbacktrace (); |
| 1950 | (Lisp_Object (*) (Lisp_Object)) Fbacktrace, | 1950 | else |
| 1951 | Qnil); | 1951 | internal_with_output_to_temp_buffer |
| 1952 | #else | 1952 | ("*Backtrace*", |
| 1953 | internal_with_output_to_temp_buffer ("*Backtrace*", | 1953 | (Lisp_Object (*) (Lisp_Object)) Fbacktrace, |
| 1954 | Fbacktrace, Qnil); | 1954 | Qnil); |
| 1955 | #endif | ||
| 1956 | max_specpdl_size--; | 1955 | max_specpdl_size--; |
| 1957 | max_lisp_eval_depth -= 15; | 1956 | max_lisp_eval_depth -= 15; |
| 1958 | } | 1957 | } |