diff --git a/.github/workflows/test.yml b/.github/workflows/test.yml index 771a042..e924cbb 100644 --- a/.github/workflows/test.yml +++ b/.github/workflows/test.yml @@ -25,5 +25,4 @@ jobs: ocaml-compiler: ${{ matrix.ocaml-compiler }} - run: opam install . --deps-only --with-test - run: opam exec -- dune build - - run: echo "OCAMLRUNPARAM=b" >> $env:GITHUB_ENV - run: opam exec -- dune runtest diff --git a/lib/ca_certs.ml b/lib/ca_certs.ml index 5a78283..67a584f 100644 --- a/lib/ca_certs.ml +++ b/lib/ca_certs.ml @@ -64,7 +64,6 @@ let ( let* ) = Result.bind reencoded as a single PEM certificate. *) let windows_trust_anchors () = let* anchors = get_anchors () in - Log.info (fun m -> m "found %u anchors" (List.length anchors)); let cert_list = List.fold_left (fun acc cert -> match X509.Certificate.decode_der cert with @@ -74,7 +73,6 @@ let windows_trust_anchors () = acc) [] anchors in - Log.info (fun m -> m "cert list is %u" (List.length cert_list)); Ok (X509.Certificate.encode_pem_multiple cert_list) let trust_anchors () = diff --git a/test/tests.ml b/test/tests.ml index 9a1f1f0..07eb528 100644 --- a/test/tests.ml +++ b/test/tests.ml @@ -1024,4 +1024,4 @@ let () = [ ("X509 certificate validation", tests tas) ] | Error `Msg msg -> Logs.err (fun m -> m "error %s in ta()" msg); - exit 2 + exit 1