(Fgarbage_collect): Fix last change.

diff --git a/src/alloc.c b/src/alloc.c
index c42453d90628e0326aa44ca3a037d11bce40e948..28400ff80e38190272c141e1178c74a69f6dff0b 100644 (file)
--- 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 ();