aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog8
-rw-r--r--gc.c7
2 files changed, 12 insertions, 3 deletions
diff --git a/ChangeLog b/ChangeLog
index 94b3844dec..31ec9787e1 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,11 @@
+Mon Jun 30 22:12:46 2008 Nobuyoshi Nakada <nobu@ruby-lang.org>
+
+ * gc.c (chain_finalized_object): should not delete from finalizer
+ table until run.
+
+ * gc.c (rb_gc_call_finalizer_at_exit): deferred_final_list may be
+ empty first.
+
Mon Jun 30 18:57:05 2008 Nobuyoshi Nakada <nobu@ruby-lang.org>
* gc.c (gc_finalize_deferred): allow object allocation in finalizers.
diff --git a/gc.c b/gc.c
index 1147bffece..e4e6312126 100644
--- a/gc.c
+++ b/gc.c
@@ -2041,7 +2041,7 @@ chain_finalized_object(st_data_t key, st_data_t val, st_data_t arg)
p->as.free.next = *final_list;
*final_list = p;
}
- return ST_DELETE;
+ return ST_CONTINUE;
}
void
@@ -2053,12 +2053,13 @@ rb_gc_call_finalizer_at_exit(void)
/* run finalizers */
if (need_call_final) {
- while ((p = deferred_final_list) != 0) {
+ do {
+ p = deferred_final_list;
deferred_final_list = 0;
finalize_list(objspace, p);
st_foreach(finalizer_table, chain_finalized_object,
(st_data_t)&deferred_final_list);
- }
+ } while (deferred_final_list);
}
/* finalizers are part of garbage collection */
during_gc++;