X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FSchedule.c;h=fa26c03708fd29196f45d5422818c9d2f37a3865;hb=52c078343e70a170441fed71480ba8569475c4cd;hp=6411b102d80a44b776d95d3bb876a90208746289;hpb=d888cbcbaa3b4113fca39b9a0888b404ed8ec9b8;p=ghc-hetmet.git

diff --git a/ghc/rts/Schedule.c b/ghc/rts/Schedule.c
index 6411b10..fa26c03 100644
--- a/ghc/rts/Schedule.c
+++ b/ghc/rts/Schedule.c
@@ -1,5 +1,5 @@
 /* ---------------------------------------------------------------------------
- * $Id: Schedule.c,v 1.98 2001/07/24 06:31:36 ken Exp $
+ * $Id: Schedule.c,v 1.99 2001/07/30 09:47:13 simonmar Exp $
  *
  * (c) The GHC Team, 1998-2000
  *
@@ -2092,7 +2092,8 @@ take_off_run_queue(StgTSO *tso) {
 	KH @ 25/10/99
 */
 
-static void GetRoots(evac_fn evac)
+static void
+GetRoots(evac_fn evac)
 {
   StgMainThread *m;