From d22be14d739b850360baf6621411374a93eb08d5 Mon Sep 17 00:00:00 2001 From: Andreas Schwab Date: Mon, 26 May 2003 22:03:17 +0000 Subject: [PATCH] (Fgarbage_collect): Fix last change. --- src/alloc.c | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/src/alloc.c b/src/alloc.c index c42453d9062..28400ff80e3 100644 --- a/src/alloc.c +++ b/src/alloc.c @@ -4311,9 +4311,13 @@ Garbage collection happens automatically if you cons more than #if (GC_MARK_STACK == GC_USE_GCPROS_AS_BEFORE \ || GC_MARK_STACK == GC_USE_GCPROS_CHECK_ZOMBIES) - for (tail = gcprolist; tail; tail = tail->next) - for (i = 0; i < tail->nvars; i++) - XUNMARK (tail->var[i]); + { + register struct gcpro *tail; + + for (tail = gcprolist; tail; tail = tail->next) + for (i = 0; i < tail->nvars; i++) + XUNMARK (tail->var[i]); + } #endif unmark_byte_stack (); -- 2.11.4.GIT