diff options
author | sof@galois.com <unknown> | 2006-11-01 22:09:50 +0000 |
---|---|---|
committer | sof@galois.com <unknown> | 2006-11-01 22:09:50 +0000 |
commit | e0171e5a1b7112fda291d4472786df198cb4ed53 (patch) | |
tree | b1d3925bdbfa40c661335dd86fbf4ce5d50c93b0 /rts/win32 | |
parent | 00abc3998739f7db38a2466b6e730105f16f8ddf (diff) | |
download | haskell-e0171e5a1b7112fda291d4472786df198cb4ed53.tar.gz |
add a few #includes to make it compile
Diffstat (limited to 'rts/win32')
-rw-r--r-- | rts/win32/ConsoleHandler.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/rts/win32/ConsoleHandler.c b/rts/win32/ConsoleHandler.c index 308b77bfcc..12ab45dad5 100644 --- a/rts/win32/ConsoleHandler.c +++ b/rts/win32/ConsoleHandler.c @@ -3,6 +3,7 @@ * */ #include "Rts.h" +#include "Storage.h" #include <windows.h> #include "ConsoleHandler.h" #include "SchedAPI.h" @@ -10,6 +11,7 @@ #include "RtsUtils.h" #include "RtsFlags.h" #include "AsyncIO.h" +#include "Stable.h" #include "RtsSignals.h" extern int stg_InstallConsoleEvent(int action, StgStablePtr *handler); @@ -46,6 +48,7 @@ initUserSignals(void) return; } +/* Seems to be a bit of an orphan...where used? */ void finiUserSignals(void) { @@ -186,7 +189,7 @@ void startSignalHandlers(Capability *cap) * Evacuate the handler stack. _Assumes_ that console event delivery * has already been blocked. */ -void markSignalHandlers (evac_fn evac) +void markSignalHandlers (evac_fn evac STG_UNUSED) { // nothing to mark; the console handler is a StablePtr which is // already treated as a root by the GC. |