[project @ 2003-04-08 15:54:24 by sof]

[ghc-hetmet.git] / ghc / rts / win32 / AwaitEvent.c

diff --git a/ghc/rts/win32/AwaitEvent.c b/ghc/rts/win32/AwaitEvent.c
index e6a551d..a8f73ff 100644 (file)
--- a/ghc/rts/win32/AwaitEvent.c
+++ b/ghc/rts/win32/AwaitEvent.c
@@ -16,6 +16,9 @@
 #include "Schedule.h"
 #include <windows.h>
 #include "win32/AsyncIO.h"
+#if defined(RTS_SUPPORTS_THREADS)
+#include "Capability.h"
+#endif
 
 void
 awaitEvent(rtsBool wait)