From: panne <unknown>
Date: Sun, 24 Apr 2005 20:19:30 +0000 (+0000)
Subject: [project @ 2005-04-24 20:19:30 by panne]
X-Git-Tag: Initial_conversion_from_CVS_complete~681
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=c4c120579dfdc453989081b2ab66d517c88db527

[project @ 2005-04-24 20:19:30 by panne]
Warning police (unused parameter)
---

diff --git a/ghc/rts/Signals.c b/ghc/rts/Signals.c
index bd8c3aa..425d90a 100644
--- a/ghc/rts/Signals.c
+++ b/ghc/rts/Signals.c
@@ -353,6 +353,8 @@ startSignalHandler(int sig)  // called by the IO manager, see GHC.Conc
 	createIOThread(RtsFlags.GcFlags.initialStkSize, 
 		       (StgClosure *)deRefStablePtr((StgStablePtr)handlers[sig]))
 	);
+#else
+    (void)sig;   /* keep gcc -Wall happy */
 #endif
 }