emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 6ad9b8d: * src/eval.c (init_eval_once): Bump max_specpdl_size (bu


From: Stefan Monnier
Subject: master 6ad9b8d: * src/eval.c (init_eval_once): Bump max_specpdl_size (bug46818)
Date: Mon, 1 Mar 2021 11:42:10 -0500 (EST)

branch: master
commit 6ad9b8d677fe136b9a0489eef0c2dd6a1f63917d
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    * src/eval.c (init_eval_once): Bump max_specpdl_size (bug46818)
    
    Further testing seems to confirm my suspicion that the increase in the
    specpdl comes from the recent change to `pcase--if`.
    
    * lisp/international/mule-cmds.el (update-leim-list-file): Revert 
workaround.
---
 lisp/international/mule-cmds.el | 9 ++-------
 src/eval.c                      | 2 +-
 2 files changed, 3 insertions(+), 8 deletions(-)

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index e1dbf82..e4bdf50 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -1312,13 +1312,8 @@ Each function is called with one arg, LEIM directory 
name.")
 
 (defun update-leim-list-file (&rest dirs)
   "Update LEIM list file in directories DIRS."
-  ;; bug#46818: This `let'-binding is not necessary, but
-  ;; it reduces the recursion depth during bootstrap (at which
-  ;; point some of the core ELisp files haven't been byte-compiled
-  ;; yet, which causes deeper-than-normal recursion).
-  (let ((vc-handled-backends nil))
-    (dolist (function update-leim-list-functions)
-      (apply function dirs))))
+  (dolist (function update-leim-list-functions)
+    (apply function dirs)))
 
 (defvar-local current-input-method nil
   "The current input method for multilingual text.
diff --git a/src/eval.c b/src/eval.c
index 542d7f6..ddaa8ed 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -219,7 +219,7 @@ void
 init_eval_once (void)
 {
   /* Don't forget to update docs (lispref node "Local Variables").  */
-  max_specpdl_size = 1600; /* 1500 is not enough for cl-generic.el.  */
+  max_specpdl_size = 1800; /* See bug#46818.  */
   max_lisp_eval_depth = 800;
   Vrun_hooks = Qnil;
   pdumper_do_now_and_after_load (init_eval_once_for_pdumper);



reply via email to

[Prev in Thread] Current Thread [Next in Thread]