1 new commit in XEmacs:
https://bitbucket.org/xemacs/xemacs/commits/acf1c26e3019/
Changeset: acf1c26e3019
User: Jerry James
Date: 2014-05-15 20:25:25
Summary: Bind print-circle when printing backtraces.
See <CAHCOHQkhpgXZFH5pWAEzdkzVsbAeQqCpNAKsFte1pX8Fv5FjNA(a)mail.gmail.com> in
xemacs-patches.
Affected #: 2 files
diff -r d2c0ff38ad5cf62e35cfe32960c50e923b651bbb -r
acf1c26e3019f3e8171b591c5b9e120f87187012 src/ChangeLog
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,9 @@
+2014-05-08 Jerry James <james(a)xemacs.org>
+
+ * print.c (struct debug_bindings): Add print_circle field.
+ (debug_print_exit): Restore print_circle.
+ (debug_print_enter): Save print_circle binding and set it.
+
2014-05-06 Jerry James <james(a)xemacs.org>
* file-coding.c (encode_decode_coding_region): Signal an error if
diff -r d2c0ff38ad5cf62e35cfe32960c50e923b651bbb -r
acf1c26e3019f3e8171b591c5b9e120f87187012 src/print.c
--- a/src/print.c
+++ b/src/print.c
@@ -164,6 +164,7 @@
int print_depth;
int print_readably;
int print_unbuffered;
+ int print_circle;
int in_debug_print;
int gc_currently_forbidden;
Lisp_Object Vprint_length;
@@ -2847,6 +2848,7 @@
print_depth = bindings->print_depth;
print_readably = bindings->print_readably;
print_unbuffered = bindings->print_unbuffered;
+ print_circle = bindings->print_circle;
in_debug_print = bindings->in_debug_print;
gc_currently_forbidden = bindings->gc_currently_forbidden;
Vprint_length = bindings->Vprint_length;
@@ -2873,6 +2875,7 @@
bindings->print_depth = print_depth;
bindings->print_readably = print_readably;
bindings->print_unbuffered = print_unbuffered;
+ bindings->print_circle = print_circle;
bindings->in_debug_print = in_debug_print;
bindings->gc_currently_forbidden = gc_currently_forbidden;
bindings->Vprint_length = Vprint_length;
@@ -2885,6 +2888,7 @@
print_depth = 0;
print_readably = debug_print_readably != -1 ? debug_print_readably : 0;
print_unbuffered++;
+ print_circle = 1;
in_debug_print = 1;
gc_currently_forbidden = 1;
if (debug_print_length > 0)
Repository URL:
https://bitbucket.org/xemacs/xemacs/
--
This is a commit notification from
bitbucket.org. You are receiving
this because you have the service enabled, addressing the recipient of
this email.
_______________________________________________
XEmacs-Patches mailing list
XEmacs-Patches(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-patches