Commit 3072ee8d authored by simonmar's avatar simonmar
Browse files

[project @ 2003-08-15 12:43:57 by simonmar]

Fix a bug in forkProcess: the current thread should not be on the run
queue while it is running.

Merged from STABLE (1.169.2.1).
parent 060cb7d9
/* --------------------------------------------------------------------------- /* ---------------------------------------------------------------------------
* $Id: Schedule.c,v 1.172 2003/07/12 00:09:15 sof Exp $ * $Id: Schedule.c,v 1.173 2003/08/15 12:43:57 simonmar Exp $
* *
* (c) The GHC Team, 1998-2000 * (c) The GHC Team, 1998-2000
* *
...@@ -1513,7 +1513,7 @@ forkProcess(StgTSO* tso) ...@@ -1513,7 +1513,7 @@ forkProcess(StgTSO* tso)
} else { /* child */ } else { /* child */
/* wipe all other threads */ /* wipe all other threads */
run_queue_hd = run_queue_tl = tso; run_queue_hd = run_queue_tl = END_TSO_QUEUE;
tso->link = END_TSO_QUEUE; tso->link = END_TSO_QUEUE;
/* When clearing out the threads, we need to ensure /* When clearing out the threads, we need to ensure
......
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