From 7194267b3bdf68ad75bd6bee8e7c6377f7b0ea2f Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Mon, 10 Apr 2000 05:48:43 +0000
Subject: 2000-04-10

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@661 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 gc.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'gc.c')

diff --git a/gc.c b/gc.c
index 494e8f2331..a236c6296a 100644
--- a/gc.c
+++ b/gc.c
@@ -1182,8 +1182,10 @@ rb_gc_call_finalizer_at_exit()
     for (i = 0; i < heaps_used; i++) {
 	p = heaps[i]; pend = p + HEAP_SLOTS;
 	while (p < pend) {
-	    if (FL_TEST(p, FL_FINALIZE))
+	    if (FL_TEST(p, FL_FINALIZE)) {
+		p->as.free.flag = 0;
 		run_final((VALUE)p);
+	    }
 	    p++;
 	}
     }
-- 
cgit v1.2.3