diff options
Diffstat (limited to 'src/eval.c')
| -rw-r--r-- | src/eval.c | 23 |
1 files changed, 11 insertions, 12 deletions
diff --git a/src/eval.c b/src/eval.c index 94ad0607732..fe29564aa2d 100644 --- a/src/eval.c +++ b/src/eval.c | |||
| @@ -220,17 +220,14 @@ void | |||
| 220 | init_eval_once (void) | 220 | init_eval_once (void) |
| 221 | { | 221 | { |
| 222 | /* Don't forget to update docs (lispref node "Local Variables"). */ | 222 | /* Don't forget to update docs (lispref node "Local Variables"). */ |
| 223 | if (!NATIVE_COMP_FLAG) | 223 | #ifndef HAVE_NATIVE_COMP |
| 224 | { | 224 | max_specpdl_size = 1800; /* See bug#46818. */ |
| 225 | max_specpdl_size = 1800; /* See bug#46818. */ | 225 | max_lisp_eval_depth = 800; |
| 226 | max_lisp_eval_depth = 800; | 226 | #else |
| 227 | } | 227 | /* Original values increased for comp.el. */ |
| 228 | else | 228 | max_specpdl_size = 2500; |
| 229 | { | 229 | max_lisp_eval_depth = 1600; |
| 230 | /* Original values increased for comp.el. */ | 230 | #endif |
| 231 | max_specpdl_size = 2500; | ||
| 232 | max_lisp_eval_depth = 1600; | ||
| 233 | } | ||
| 234 | Vrun_hooks = Qnil; | 231 | Vrun_hooks = Qnil; |
| 235 | pdumper_do_now_and_after_load (init_eval_once_for_pdumper); | 232 | pdumper_do_now_and_after_load (init_eval_once_for_pdumper); |
| 236 | } | 233 | } |
| @@ -3278,11 +3275,13 @@ funcall_lambda (Lisp_Object fun, ptrdiff_t nargs, | |||
| 3278 | else if (MODULE_FUNCTIONP (fun)) | 3275 | else if (MODULE_FUNCTIONP (fun)) |
| 3279 | return funcall_module (fun, nargs, arg_vector); | 3276 | return funcall_module (fun, nargs, arg_vector); |
| 3280 | #endif | 3277 | #endif |
| 3278 | #ifdef HAVE_NATIVE_COMP | ||
| 3281 | else if (SUBR_NATIVE_COMPILED_DYNP (fun)) | 3279 | else if (SUBR_NATIVE_COMPILED_DYNP (fun)) |
| 3282 | { | 3280 | { |
| 3283 | syms_left = XSUBR (fun)->lambda_list[0]; | 3281 | syms_left = XSUBR (fun)->lambda_list; |
| 3284 | lexenv = Qnil; | 3282 | lexenv = Qnil; |
| 3285 | } | 3283 | } |
| 3284 | #endif | ||
| 3286 | else | 3285 | else |
| 3287 | emacs_abort (); | 3286 | emacs_abort (); |
| 3288 | 3287 | ||