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 = do
|
||||
#ifdef mingw32_HOST_OS
|
||||
forever $ threadDelaySeconds (Seconds 6)
|
||||
forever $ threadDelaySeconds (Seconds 6000)
|
||||
#else
|
||||
lock <- newEmptyMVar
|
||||
let check sig = void $
|
||||
|
|
Loading…
Reference in a new issue