Commit de36fea0 authored by simonpj's avatar simonpj
Browse files

[project @ 2004-12-17 16:13:27 by simonpj]

Fix breakage in previous commit re signal handling
parent da1625cf
......@@ -205,8 +205,8 @@ installSignalHandlers = do
interrupt = throwTo main_thread interrupt_exn
#if !defined(mingw32_HOST_OS)
installHandler sigQUIT interrupt Nothing
installHandler sigINT interrupt Nothing
installHandler sigQUIT (Catch interrupt) Nothing
installHandler sigINT (Catch interrupt) Nothing
return ()
#elif __GLASGOW_HASKELL__ >= 603
-- GHC 6.3+ has support for console events on Windows
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment