From: Simon Marlow Date: Fri, 16 Jun 2006 14:06:52 +0000 (+0000) Subject: make compilation a little less noisy X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=48ff2a03397d744e4b24797d7b16fdaf6feb576a;p=ghc-hetmet.git make compilation a little less noisy --- diff --git a/rts/Task.c b/rts/Task.c index 8779e29..c8cd9c4 100644 --- a/rts/Task.c +++ b/rts/Task.c @@ -189,7 +189,7 @@ discardTask (Task *task) { ASSERT_LOCK_HELD(&sched_mutex); if (!task->stopped) { - debugTrace(DEBUG_sched, "discarding task %p", TASK_ID(task)); + debugTrace(DEBUG_sched, "discarding task %ld", TASK_ID(task)); task->cap = NULL; task->tso = NULL; task->stopped = rtsTrue; @@ -240,7 +240,7 @@ workerTaskStop (Task *task) void resetTaskManagerAfterFork (void) { -#warning TODO! + // TODO! taskCount = 0; }