From: Simon Marlow <marlowsd@gmail.com>
Date: Wed, 5 May 2010 11:50:15 +0000 (+0000)
Subject: tidyup; no functional changes
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=58b2c6dfaf64a06eff317235f8ac9b7f73b5bf5a

tidyup; no functional changes
---

diff --git a/rts/Schedule.c b/rts/Schedule.c
index 5ed575e..b350ade 100644
--- a/rts/Schedule.c
+++ b/rts/Schedule.c
@@ -1997,12 +1997,7 @@ initScheduler(void)
 }
 
 void
-exitScheduler(
-    rtsBool wait_foreign
-#if !defined(THREADED_RTS)
-                         __attribute__((unused))
-#endif
-)
+exitScheduler (rtsBool wait_foreign USED_IF_THREADS)
                /* see Capability.c, shutdownCapability() */
 {
     Task *task = NULL;