Commit 80f067ce authored by sof's avatar sof
Browse files

[project @ 2002-02-18 17:27:24 by sof]

unused arg wibble
parent d94938cc
/* ---------------------------------------------------------------------------
* $Id: Schedule.c,v 1.131 2002/02/18 13:26:13 sof Exp $
* $Id: Schedule.c,v 1.132 2002/02/18 17:27:24 sof Exp $
*
* (c) The GHC Team, 1998-2000
*
......@@ -1426,7 +1426,12 @@ void deleteAllThreads ( void )
* ------------------------------------------------------------------------- */
StgInt
suspendThread( StgRegTable *reg, rtsBool concCall )
suspendThread( StgRegTable *reg,
rtsBool concCall
#if !defined(RTS_SUPPORTS_THREADS)
STG_UNUSED
#endif
)
{
nat tok;
Capability *cap;
......@@ -1476,7 +1481,12 @@ suspendThread( StgRegTable *reg, rtsBool concCall )
}
StgRegTable *
resumeThread( StgInt tok, rtsBool concCall )
resumeThread( StgInt tok,
rtsBool concCall
#if !defined(RTS_SUPPORTS_THREADS)
STG_UNUSED
#endif
)
{
StgTSO *tso, **prev;
Capability *cap;
......
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