From fe652a8b56c864167ecf1fac899bb3d99363dfcf Mon Sep 17 00:00:00 2001 From: Takano Akio Date: Mon, 11 Mar 2013 18:51:05 +0900 Subject: Maintain per-generation lists of weak pointers (#7847) --- rts/sm/GC.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'rts/sm/GC.c') diff --git a/rts/sm/GC.c b/rts/sm/GC.c index ddb538472f..28593f5c71 100644 --- a/rts/sm/GC.c +++ b/rts/sm/GC.c @@ -699,7 +699,7 @@ GarbageCollect (nat collect_gen, // Start any pending finalizers. Must be after // updateStableTables() and stableUnlock() (see #4221). RELEASE_SM_LOCK; - scheduleFinalizers(cap, old_weak_ptr_list); + scheduleFinalizers(cap, dead_weak_ptr_list); ACQUIRE_SM_LOCK; // check sanity after GC -- cgit v1.2.1