diff options
Diffstat (limited to 'Utility/ThreadScheduler.hs')
| -rw-r--r-- | Utility/ThreadScheduler.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Utility/ThreadScheduler.hs b/Utility/ThreadScheduler.hs index 2b26baeb6..c3e871cde 100644 --- a/Utility/ThreadScheduler.hs +++ b/Utility/ThreadScheduler.hs @@ -13,7 +13,7 @@ module Utility.ThreadScheduler where import Common import Control.Concurrent -#ifndef __WINDOWS__ +#ifndef mingw32_HOST_OS import System.Posix.Signals #ifndef __ANDROID__ import System.Posix.Terminal @@ -54,7 +54,7 @@ unboundDelay time = do waitForTermination :: IO () waitForTermination = do lock <- newEmptyMVar -#ifndef __WINDOWS__ +#ifndef mingw32_HOST_OS let check sig = void $ installHandler sig (CatchOnce $ putMVar lock ()) Nothing check softwareTermination |