Mercurial > emacs
changeset 1452:ed79bb8047e8
(grow_specpdl): Increase max_specpdl_size before Fsignal.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 20 Oct 1992 06:13:00 +0000 |
| parents | 107c9b227e7f |
| children | fb2d16111e4b |
| files | src/eval.c |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/eval.c Tue Oct 20 06:12:43 1992 +0000 +++ b/src/eval.c Tue Oct 20 06:13:00 1992 +0000 @@ -2045,9 +2045,11 @@ max_specpdl_size = 400; if (specpdl_size >= max_specpdl_size) { + if (!NILP (Vdebug_on_error)) + /* Leave room for some specpdl in the debugger. */ + max_specpdl_size = specpdl_size + 100; Fsignal (Qerror, Fcons (build_string ("Variable binding depth exceeds max-specpdl-size"), Qnil)); - max_specpdl_size *= 2; } } specpdl_size *= 2;