[project @ 2003-10-05 20:18:36 by panne]
authorpanne <unknown>
Sun, 5 Oct 2003 20:18:36 +0000 (20:18 +0000)
committerpanne <unknown>
Sun, 5 Oct 2003 20:18:36 +0000 (20:18 +0000)
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

index 67984eb..787f8ae 100644 (file)
@@ -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
 }
 
 /* -----------------------------------------------------------------------------