Skip to content

Commit 46b0ffe

Browse files
committed
update domainslib/chan_stm_tests names
1 parent 32c399e commit 46b0ffe

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

src/domainslib/chan_stm_tests.ml

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -73,7 +73,7 @@ module ChT_seq = STM_sequential.Make(ChConf)
7373
module ChT_dom = STM_domain.Make(ChConf)
7474
;;
7575
QCheck_base_runner.run_tests_main
76-
(let count,name = 500,"global Domainslib.Chan test" in [
77-
ChT_seq.agree_test ~count ~name;
78-
ChT_dom.agree_test_par ~count ~name;
79-
])
76+
(let count = 500 in
77+
[ChT_seq.agree_test ~count ~name:"STM Domainslib.Chan test sequential";
78+
ChT_dom.agree_test_par ~count ~name:"STM Domainslib.Chan test parallel";
79+
])

0 commit comments

Comments
 (0)