procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* src/eval.c (init_eval_once): Bump max_specpdl_size (bug46818)

Browse source 
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.
This commit is contained in:
Stefan Monnier 2021-03-01 11:42:04 -05:00
parent 5c26ea4cbc
commit 6ad9b8d677
2 changed files with 3 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
lisp/international/mule-cmds.el
View file

@ -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.

2
src/eval.c
View file

@ -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);