1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-06 14:02:07 -08:00

(Fgarbage_collect): Clear consing_since_gc first thing.

This commit is contained in:
Karl Heuer 1995-05-24 01:39:24 +00:00
parent 82a7410763
commit 58595309d2

View file

@ -1352,6 +1352,10 @@ Garbage collection happens automatically if you cons more than\n\
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))