Mercurial > emacs
changeset 80621:57acb523331b
(print_object): Check print_depth before searching for circularities.
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Mon, 21 Jul 2008 05:05:56 +0000 |
parents | b27502af61f9 |
children | 97941d75f8ce |
files | src/print.c |
diffstat | 1 files changed, 4 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/src/print.c Mon Jul 21 05:04:14 2008 +0000 +++ b/src/print.c Mon Jul 21 05:05:56 2008 +0000 @@ -1487,6 +1487,10 @@ QUIT; + /* See similar code in print_preprocess. */ + if (print_depth > PRINT_CIRCLE) + error ("Apparently circular structure being printed"); + /* Detect circularities and truncate them. */ if (STRINGP (obj) || CONSP (obj) || VECTORP (obj) || COMPILEDP (obj) || CHAR_TABLE_P (obj) @@ -1537,9 +1541,6 @@ print_depth++; - /* See similar code in print_preprocess. */ - if (print_depth > PRINT_CIRCLE) - error ("Apparently circular structure being printed"); #ifdef MAX_PRINT_CHARS if (max_print && print_chars > max_print) {