X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FSchedule.c;h=03cd012a00c018cc91c9e31ef5c6f23cbf16696e;hb=5442794ab3d983a8658ed8582783971980a2c104;hp=68f22101e726504f81b1653b5252c8d949b7039e;hpb=a9fc39ea49ad3864a9c932a193787e451f897608;p=ghc-hetmet.git

diff --git a/ghc/rts/Schedule.c b/ghc/rts/Schedule.c
index 68f2210..03cd012 100644
--- a/ghc/rts/Schedule.c
+++ b/ghc/rts/Schedule.c
@@ -1,5 +1,5 @@
 /* ---------------------------------------------------------------------------
- * $Id: Schedule.c,v 1.70 2000/05/08 15:57:01 simonmar Exp $
+ * $Id: Schedule.c,v 1.71 2000/05/15 11:38:55 simonmar Exp $
  *
  * (c) The GHC Team, 1998-2000
  *
@@ -1189,7 +1189,7 @@ suspendThread( Capability *cap )
   ACQUIRE_LOCK(&sched_mutex);
 
   IF_DEBUG(scheduler,
-	   sched_belch("thread %d did a _ccall_gc\n", cap->rCurrentTSO->id));
+	   sched_belch("thread %d did a _ccall_gc", cap->rCurrentTSO->id));
 
   threadPaused(cap->rCurrentTSO);
   cap->rCurrentTSO->link = suspended_ccalling_threads;