Commit b7709803 authored by sof's avatar sof
Browse files

[project @ 2002-02-15 20:58:14 by sof]

suspendThread() comment
parent 21001dc3
/* --------------------------------------------------------------------------- /* ---------------------------------------------------------------------------
* $Id: Schedule.c,v 1.127 2002/02/15 17:49:23 sof Exp $ * $Id: Schedule.c,v 1.128 2002/02/15 20:58:14 sof Exp $
* *
* (c) The GHC Team, 1998-2000 * (c) The GHC Team, 1998-2000
* *
...@@ -1469,6 +1469,7 @@ suspendThread( StgRegTable *reg ) ...@@ -1469,6 +1469,7 @@ suspendThread( StgRegTable *reg )
startTask(taskStart); startTask(taskStart);
#endif #endif
/* Other threads _might_ be available for execution; signal this */
THREAD_RUNNABLE(); THREAD_RUNNABLE();
RELEASE_LOCK(&sched_mutex); RELEASE_LOCK(&sched_mutex);
return tok; return tok;
......
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