simon/ocaml-containers
1
0
Fork 0
mirror of https://github.com/c-cube/ocaml-containers.git synced 2025-12-05 19:00:31 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

be nicer to mac OS' lazy scheduler in tests

Browse source
This commit is contained in:
Simon Cruanes 2020-12-21 17:17:47 -05:00
parent f2a472ab44
commit b18a71efd6
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/threads/CCTimer.ml
View file

@ -198,8 +198,8 @@ let stop timer =
~f:(fun () -> CCLock.update n (fun x -> x+2));
ignore (Thread.create
(fun _ -> Thread.delay 0.4; CCLock.set res (CCLock.get n)) ());
after timer 0.2
after timer 0.1
~f:(fun () -> CCLock.update n (fun x -> x * 4));
Thread.delay 0.6 ;
OUnit.assert_equal 6 (CCLock.get res);
OUnit.assert_equal ~printer:Q.Print.int 6 (CCLock.get res);
*)