Skip to content

Commit 6a985da

Browse files
committed
Increase test time to avoid "sleep blocked caller" failure
1 parent 6d311d0 commit 6a985da

File tree

2 files changed

+4
-4
lines changed

2 files changed

+4
-4
lines changed

tests/FSharpPlus.Tests/Task.fs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -333,10 +333,10 @@ module Task =
333333
let t =
334334
monad' {
335335
do! Task.Yield()
336-
Thread.Sleep(100)
336+
Thread.Sleep(500)
337337
}
338338
sw.Stop()
339-
require (sw.ElapsedMilliseconds < 50L) "sleep blocked caller"
339+
require (sw.ElapsedMilliseconds < 450L) "sleep blocked caller"
340340
t.Wait()
341341

342342
let failtest str = raise (TestException str)

tests/FSharpPlus.Tests/ValueTask.fs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -284,10 +284,10 @@ module ValueTask =
284284
let t =
285285
monad' {
286286
do! ValueTask.Yield()
287-
Thread.Sleep(100)
287+
Thread.Sleep(500)
288288
}
289289
sw.Stop()
290-
require (sw.ElapsedMilliseconds < 50L) "sleep blocked caller"
290+
require (sw.ElapsedMilliseconds < 450L) "sleep blocked caller"
291291
t.Wait()
292292

293293
let failtest str = raise (TestException str)

0 commit comments

Comments
 (0)