Commit db18148d authored by simonmar's avatar simonmar
Browse files

[project @ 2005-11-25 14:33:12 by simonmar]

We must empty the suspended_ccalling_tasks and the returning_task list
when forking.
parent c282a810
......@@ -2088,9 +2088,13 @@ forkProcess(HsStablePtr *entry
}
RELEASE_LOCK(&sched_mutex);
cap->suspended_ccalling_tasks = NULL;
#if defined(THREADED_RTS)
// wipe our spare workers list.
cap->spare_workers = NULL;
cap->returning_tasks_hd = NULL;
cap->returning_tasks_tl = NULL;
#endif
cap = rts_evalStableIO(cap, entry, NULL); // run the action
......
Supports Markdown
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