HCoop
/
bpt
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
f275fd9
)
(grow_specpdl): Increase max_specpdl_size before Fsignal.
author
Richard M. Stallman
<rms@gnu.org>
Tue, 20 Oct 1992 06:13:00 +0000
(06:13 +0000)
committer
Richard M. Stallman
<rms@gnu.org>
Tue, 20 Oct 1992 06:13:00 +0000
(06:13 +0000)
src/eval.c
patch
|
blob
|
blame
|
history
diff --git
a/src/eval.c
b/src/eval.c
index
f3cb113
..
3974568
100644
(file)
--- a/
src/eval.c
+++ b/
src/eval.c
@@
-2045,9
+2045,11
@@
grow_specpdl ()
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;