From 45ee5a699675235094a4f471b33f1f54670ec85a Mon Sep 17 00:00:00 2001
From: panne <unknown>
Date: Sun, 5 Oct 2003 20:18:36 +0000
Subject: [PATCH] [project @ 2003-10-05 20:18:36 by panne] Unbreak the 2nd
 stage of non-threaded-RTS builds by #ifdefing out a call to
 wakeBlockedWorkerThread. This should probably fixed more
 cleanly by taking an OO view, i.e. always defining this
 function, but doing nothing in the non-threaded case. The
 final decision on this issue is left to the Masters of the
 Threads (tm)...

---
 ghc/rts/Schedule.c |    4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/ghc/rts/Schedule.c b/ghc/rts/Schedule.c
index 67984eb..787f8ae 100644
--- a/ghc/rts/Schedule.c
+++ b/ghc/rts/Schedule.c
@@ -1,5 +1,5 @@
 /* ---------------------------------------------------------------------------
- * $Id: Schedule.c,v 1.178 2003/10/01 21:16:12 wolfgang Exp $
+ * $Id: Schedule.c,v 1.179 2003/10/05 20:18:36 panne Exp $
  *
  * (c) The GHC Team, 1998-2000
  *
@@ -3141,7 +3141,9 @@ interruptStgRts(void)
 {
     interrupted    = 1;
     context_switch = 1;
+#ifdef RTS_SUPPORTS_THREADS
     wakeBlockedWorkerThread();
+#endif
 }
 
 /* -----------------------------------------------------------------------------
-- 
1.7.10.4