increase sleep
This commit is contained in:
parent
cee75b0104
commit
cf384cddfb
1 changed files with 1 additions and 1 deletions
|
@ -57,7 +57,7 @@ unboundDelay time = do
|
||||||
waitForTermination :: IO ()
|
waitForTermination :: IO ()
|
||||||
waitForTermination = do
|
waitForTermination = do
|
||||||
#ifdef mingw32_HOST_OS
|
#ifdef mingw32_HOST_OS
|
||||||
forever $ threadDelaySeconds (Seconds 6)
|
forever $ threadDelaySeconds (Seconds 6000)
|
||||||
#else
|
#else
|
||||||
lock <- newEmptyMVar
|
lock <- newEmptyMVar
|
||||||
let check sig = void $
|
let check sig = void $
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue