changeset 11892:6be0b7a0ac44

(Fgarbage_collect): Clear consing_since_gc first thing.
author Karl Heuer <kwzh@gnu.org>
date Wed, 24 May 1995 01:39:24 +0000
parents 937c7fced6ee
children 1f70ffad3d6d
files src/alloc.c
diffstat 1 files changed, 4 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/alloc.c	Wed May 24 01:02:08 1995 +0000
+++ b/src/alloc.c	Wed May 24 01:39:24 1995 +0000
@@ -1352,6 +1352,10 @@
   char stack_top_variable;
   register int i;
 
+  /* In case user calls debug_print during GC,
+     don't let that cause a recursive GC.  */
+  consing_since_gc = 0;
+
   /* Save a copy of the contents of the stack, for debugging.  */
 #if MAX_SAVE_STACK > 0
   if (NILP (Vpurify_flag))