From a6d6eec6c757745e4c98c69187abd9a2a1b5e075 Mon Sep 17 00:00:00 2001 From: Simon Cruanes Date: Tue, 20 Feb 2024 20:35:54 -0500 Subject: [PATCH] CI: make test mroe deterministic, run tests with all depopts --- .github/workflows/main.yml | 9 ++++----- test/lwt/hash_client.ml | 2 -- 2 files changed, 4 insertions(+), 7 deletions(-) diff --git a/.github/workflows/main.yml b/.github/workflows/main.yml index 157b43d7..88e2d8a6 100644 --- a/.github/workflows/main.yml +++ b/.github/workflows/main.yml @@ -37,9 +37,8 @@ jobs: - run: opam install -t moonpool --deps-only if: matrix.ocaml-compiler != '5.1' - run: opam exec -- dune build @install - - run: opam exec -- dune runtest - - run: opam install thread-local-storage trace - - run: opam exec -- dune build @install @runtest - - run: opam install trace thread-local-storage - - run: opam exec -- dune build @install + + # install some depopts + - run: opam install thread-local-storage trace domain-local-await + - run: opam exec -- dune build @install @runtest diff --git a/test/lwt/hash_client.ml b/test/lwt/hash_client.ml index 1138f789..e6ea0c6d 100644 --- a/test/lwt/hash_client.ml +++ b/test/lwt/hash_client.ml @@ -49,8 +49,6 @@ let main ~port ~runner ~ext ~dir ~n_conn () : unit Lwt.t = ~data:(fun () -> [ "d", `String file ]) in - (let@ () = M.Lock.with_ lock_stdout in - Printf.printf "explore %S\n%!" file); Str_tbl.add seen file (); let d = Sys.readdir file in Array.sort String.compare d;