From 6d22c8360fa5712b2f288949d43d904e5f2d33a2 Mon Sep 17 00:00:00 2001 From: simonmar Date: Mon, 28 Nov 2005 14:37:56 +0000 Subject: [PATCH] [project @ 2005-11-28 14:37:56 by simonmar] small fix to debugging output --- ghc/rts/Schedule.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ghc/rts/Schedule.c b/ghc/rts/Schedule.c index d1a6a55..c4b253f 100644 --- a/ghc/rts/Schedule.c +++ b/ghc/rts/Schedule.c @@ -633,8 +633,8 @@ run_thread: // immediately and return to normaility. if (ret == ThreadBlocked) { IF_DEBUG(scheduler, - debugBelch("--<< thread %d (%s) stopped: blocked\n", - t->id, whatNext_strs[t->what_next])); + sched_belch("--<< thread %d (%s) stopped: blocked\n", + t->id, whatNext_strs[t->what_next])); continue; } #endif -- 1.7.10.4