[test] increase jobs timeout for checking the job results

parent 81a1a72f
...@@ -370,7 +370,7 @@ testMarkProgress = do ...@@ -370,7 +370,7 @@ testMarkProgress = do
readAllEvents = do readAllEvents = do
-- We will get thread blocking if there is ANY error in the job -- We will get thread blocking if there is ANY error in the job
-- Hence we assert the `readAllEvents` test doesn't take too long -- Hence we assert the `readAllEvents` test doesn't take too long
mRet <- timeout 1_000_000 $ atomically $ do mRet <- timeout 2_000_000 $ atomically $ do
allEventsArrived <- isFullTBQueue evts allEventsArrived <- isFullTBQueue evts
-- STM retry if things failed -- STM retry if things failed
check allEventsArrived check allEventsArrived
......
Markdown is supported
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