mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-11 10:20:33 -08:00
Code Issues Projects Releases Wiki Activity

2005-12-17 Chong Yidong <cyd@stupidchicken.com>

Browse source 
* print.c (print_preprocess): Just signal an error if print_depth
	is exceeded.
This commit is contained in:
Chong Yidong 2005-12-17 15:55:29 +00:00
parent 04df9646f2
commit 6b8dfbf78a
2 changed files with 7 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/ChangeLog
View file

@ -1,3 +1,8 @@
2005-12-17 Chong Yidong <cyd@stupidchicken.com>
* print.c (print_preprocess): Just signal an error if print_depth
is exceeded.
2005-12-17 Eli Zaretskii <eliz@gnu.org>
* .gdbinit: Set a breakpoint on w32_abort.

10
src/print.c
View file

@ -1313,14 +1313,8 @@ print_preprocess (obj)
/* Give up if we go so deep that print_object will get an error. */
/* See similar code in print_object. */
/* Because print_preprocess "follows" nested lists in a slightly
different order from print_object, there is a risk of giving up
too soon. In that case, a deeply nested circular list may cause
print_object to loop. Using 3 * PRINT_CIRCLE should make this
possibility negligible, but at some point someone will have to
sit down and do a more careful analysis. -- cyd */
if (print_depth >= 3 * PRINT_CIRCLE)
return;
if (print_depth >= PRINT_CIRCLE)
error ("Apparently circular structure being printed");
/* Avoid infinite recursion for circular nested structure
in the case where Vprint_circle is nil. */