File tree 1 file changed +12
-5
lines changed
1 file changed +12
-5
lines changed Original file line number Diff line number Diff line change 45
45
46
46
module BT_domain = Lin_domain. Make (BConf )
47
47
module BT_thread = Lin_thread. Make (BConf )
48
+
49
+ let thread_tail =
50
+ if Sys. (ocaml_release.major,ocaml_release.minor) < (5 ,3 )
51
+ then
52
+ (Printf. printf " Lin.thread Bytes tests disabled on OCaml 5.2 and earlier\n %!" ; [] )
53
+ else
54
+ [ BT_thread. neg_lin_test ~count: 5000 ~name: " Lin Bytes test with Thread" ; ]
48
55
;;
49
- QCheck_base_runner. run_tests_main [
50
- BT_domain. neg_lin_test ~count: 5000 ~name: " Lin Bytes test with Domain" ;
51
- BT_thread. neg_lin_test ~count: 5000 ~name: " Lin Bytes test with Thread " ;
52
- BT_domain. stress_test ~count: 1000 ~name: " Lin Bytes stress test with Domain " ;
53
- ]
56
+ QCheck_base_runner. run_tests_main (
57
+ BT_domain. neg_lin_test ~count: 5000 ~name: " Lin Bytes test with Domain" ::
58
+ BT_domain. stress_test ~count: 1000 ~name: " Lin Bytes stress test with Domain " ::
59
+ thread_tail
60
+ )
You can’t perform that action at this time.
0 commit comments