projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
RTS tidyup sweep, first phase
[ghc-hetmet.git]
/
rts
/
win32
/
ThrIOManager.c
diff --git
a/rts/win32/ThrIOManager.c
b/rts/win32/ThrIOManager.c
index
e2310ef
..
e62b33d
100644
(file)
--- a/
rts/win32/ThrIOManager.c
+++ b/
rts/win32/ThrIOManager.c
@@
-8,7
+8,7
@@
* ---------------------------------------------------------------------------*/
\r
\r
#include "Rts.h"
\r
* ---------------------------------------------------------------------------*/
\r
\r
#include "Rts.h"
\r
-#include "ThrIOManager.h"
\r
+#include "IOManager.h"
\r
#include "Prelude.h"
\r
#include <windows.h>
\r
\r
#include "Prelude.h"
\r
#include <windows.h>
\r
\r
@@
-34,7
+34,7
@@
getIOManagerEvent (void)
hRes = CreateEvent ( NULL, // no security attrs
\r
TRUE, // manual reset
\r
FALSE, // initial state,
\r
hRes = CreateEvent ( NULL, // no security attrs
\r
TRUE, // manual reset
\r
FALSE, // initial state,
\r
- "IO Manager Event" );
\r
+ NULL ); // event name: NULL for private events
\r
if (hRes == NULL) {
\r
sysErrorBelch("getIOManagerEvent");
\r
stg_exit(EXIT_FAILURE);
\r
if (hRes == NULL) {
\r
sysErrorBelch("getIOManagerEvent");
\r
stg_exit(EXIT_FAILURE);
\r