Mercurial > emacs
changeset 96852:790746f57900
(print_object): Check print_depth before searching for circularities.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Mon, 21 Jul 2008 05:03:39 +0000 |
| parents | dbe6e915502f |
| children | 89f46e95065e |
| 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:03:17 2008 +0000 +++ b/src/print.c Mon Jul 21 05:03:39 2008 +0000 @@ -1560,6 +1560,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) || SUB_CHAR_TABLE_P (obj) @@ -1610,9 +1614,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) {