diff options
| author | Simon Marlow <simonmar@microsoft.com> | 2006-08-25 08:44:35 +0000 |
|---|---|---|
| committer | Simon Marlow <simonmar@microsoft.com> | 2006-08-25 08:44:35 +0000 |
| commit | 610de7d17e09318272b7516bd9b97e8b2cbd170c (patch) | |
| tree | 68dc1bbe4707688bdc7aa74ab12ce7c591e4c64a /rts/win32/ConsoleHandler.c | |
| parent | edad06244b0a542d6b5c9ce3f3cd72941c5be804 (diff) | |
| download | haskell-610de7d17e09318272b7516bd9b97e8b2cbd170c.tar.gz | |
Free Win32 Handles on shutdown
patch from #878
Diffstat (limited to 'rts/win32/ConsoleHandler.c')
| -rw-r--r-- | rts/win32/ConsoleHandler.c | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/rts/win32/ConsoleHandler.c b/rts/win32/ConsoleHandler.c index cc0365b344..308b77bfcc 100644 --- a/rts/win32/ConsoleHandler.c +++ b/rts/win32/ConsoleHandler.c @@ -46,6 +46,14 @@ initUserSignals(void) return; } +void +finiUserSignals(void) +{ + if (hConsoleEvent != INVALID_HANDLE_VALUE) { + CloseHandle(hConsoleEvent); + } +} + /* * Function: shutdown_handler() * |