Commit 1a65116f authored by simonmar's avatar simonmar

[project @ 2004-09-07 09:35:02 by simonmar]

Fix bug in finalizeWeak# (should fix memo002 and maybe one or two
other tests).
parent 95473f10
......@@ -308,6 +308,9 @@ main(int argc, char *argv[])
closure_field(StgWeak,value);
closure_field(StgWeak,finalizer);
closure_size(StgDeadWeak);
closure_field(StgDeadWeak,link);
closure_size(StgMVar);
closure_field(StgMVar,head);
closure_field(StgMVar,tail);
......
......@@ -316,6 +316,7 @@ finalizzeWeakzh_fast
LDV_RECORD_CREATE(w);
f = StgWeak_finalizer(w);
StgDeadWeak_link(w) = StgWeak_link(w);
/* return the finalizer */
if (f == stg_NO_FINALIZER_closure) {
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment