summaryrefslogtreecommitdiff
path: root/libguile/gc-mark.c
diff options
context:
space:
mode:
authorKevin Ryde <user42@zip.com.au>2006-02-03 23:49:37 +0000
committerKevin Ryde <user42@zip.com.au>2006-02-03 23:49:37 +0000
commit71c7cfa502f92d93d6881a5b5327ab3453baf03a (patch)
tree82c696d7072b1d87f1f93310153a39451708d402 /libguile/gc-mark.c
parentf14a93dfe4889a633444b40bc6514f8e9e555a31 (diff)
downloadguile-71c7cfa502f92d93d6881a5b5327ab3453baf03a.tar.gz
(scm_mark_all): Fix c99-isms "loops" and "again" variables.
Diffstat (limited to 'libguile/gc-mark.c')
-rw-r--r--libguile/gc-mark.c7
1 files changed, 4 insertions, 3 deletions
diff --git a/libguile/gc-mark.c b/libguile/gc-mark.c
index f82792509..77f3ec2af 100644
--- a/libguile/gc-mark.c
+++ b/libguile/gc-mark.c
@@ -1,4 +1,4 @@
-/* Copyright (C) 1995,1996,1997,1998,1999,2000,2001, 2002, 2003, 2004 Free Software Foundation, Inc.
+/* Copyright (C) 1995,1996,1997,1998,1999,2000,2001, 2002, 2003, 2004, 2005, 2006 Free Software Foundation, Inc.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
@@ -71,6 +71,7 @@ void
scm_mark_all (void)
{
long j;
+ int loops;
scm_i_init_weak_vectors_for_gc ();
scm_i_init_guardians_for_gc ();
@@ -100,11 +101,11 @@ scm_mark_all (void)
scm_mark_subr_table ();
- int loops = 0;
+ loops = 0;
while (1)
{
- loops++;
int again;
+ loops++;
/* Mark the non-weak references of weak vectors. For a weak key
alist vector, this would mark the values for keys that are