diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2010-01-27 14:57:18 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2010-01-27 14:57:18 +0000 |
| commit | 243c043271d295c98ac0f69b4bc8fccca3b61d2d (patch) | |
| tree | 5a7c60503387d994ade40c41065effd62ef3d69f /rts | |
| parent | bb7b45dcf16118fb03bf28aea08a168ac6598a33 (diff) | |
| download | haskell-243c043271d295c98ac0f69b4bc8fccca3b61d2d.tar.gz | |
fix Windows build (GHC.Conc.runHandlers is Unix-only)
Diffstat (limited to 'rts')
| -rw-r--r-- | rts/RtsStartup.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/rts/RtsStartup.c b/rts/RtsStartup.c index 8e2eac420d..b0cddbd18f 100644 --- a/rts/RtsStartup.c +++ b/rts/RtsStartup.c @@ -184,7 +184,9 @@ hs_init(int *argc, char **argv[]) getStablePtr((StgPtr)runSparks_closure); getStablePtr((StgPtr)ensureIOManagerIsRunning_closure); +#ifndef mingw32_HOST_OS getStablePtr((StgPtr)runHandlers_closure); +#endif /* initialise the shared Typeable store */ initGlobalStore(); |