Skip to content

Commit e119669

Browse files
authored
flambda-backend: Increase delays in tests/lib-threads/beat.ml (#800)
The delay was reduced in PR#658 and the test sometimes fails with closure. This commit reverts the effect of PR#658 on tests/lib-threads/beat.ml
1 parent ccc356d commit e119669

File tree

1 file changed

+3
-3
lines changed

1 file changed

+3
-3
lines changed

testsuite/tests/lib-threads/beat.ml

+3-3
Original file line numberDiff line numberDiff line change
@@ -19,9 +19,9 @@ let tick (delay, count) =
1919

2020
let _ =
2121
let c1 = ref 0 and c2 = ref 0 in
22-
ignore (Thread.create tick (0.0333333333, c1));
23-
ignore (Thread.create tick (0.05, c2));
24-
Thread.delay 0.3;
22+
ignore (Thread.create tick (0.333333333, c1));
23+
ignore (Thread.create tick (0.5, c2));
24+
Thread.delay 3.0;
2525
let n1 = !c1 and n2 = !c2 in
2626
if n1 >= 8 && n1 <= 10 && n2 >= 5 && n2 <= 7
2727
then printf "passed\n"

0 commit comments

Comments
 (0)