My own corner of monopam
2
fork

Configure Feed

Select the types of activity you want to include in your feed.

fix: add noop test cases to empty test suites

Alcotest requires at least one test case per suite. Replace empty lists
with a single noop test case to satisfy this constraint.

+23 -23
+1 -1
ca-certs/test/test_ca_certs.ml
··· 1 - let suite = ("ca_certs", []) 1 + let suite = ("ca_certs", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
memtrace/test/test_backtrace_codec.ml
··· 1 - let suite = ("backtrace_codec", []) 1 + let suite = ("backtrace_codec", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
memtrace/test/test_buf.ml
··· 1 - let suite = ("buf", []) 1 + let suite = ("buf", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
memtrace/test/test_location_codec.ml
··· 1 - let suite = ("location_codec", []) 1 + let suite = ("location_codec", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
memtrace/test/test_stdlib_shim.ml
··· 1 - let suite = ("stdlib_shim", []) 1 + let suite = ("stdlib_shim", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
ocaml-agent/test/test_agent.ml
··· 1 - let suite = ("agent", []) 1 + let suite = ("agent", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
ocaml-agent/test/test_supervisor.ml
··· 1 - let suite = ("supervisor", []) 1 + let suite = ("supervisor", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
ocaml-btree/test/test_cell.ml
··· 1 - let suite = ("cell", []) 1 + let suite = ("cell", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
ocaml-btree/test/test_page.ml
··· 1 - let suite = ("page", []) 1 + let suite = ("page", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
ocaml-btree/test/test_pager.ml
··· 1 - let suite = ("pager", []) 1 + let suite = ("pager", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
ocaml-btree/test/test_record.ml
··· 1 - let suite = ("record", []) 1 + let suite = ("record", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
ocaml-btree/test/test_table.ml
··· 1 - let suite = ("table", []) 1 + let suite = ("table", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
ocaml-btree/test/test_varint.ml
··· 1 - let suite = ("varint", []) 1 + let suite = ("varint", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
ocaml-cbort/test/test_cbor_rw.ml
··· 1 - let suite = ("cbor_rw", []) 1 + let suite = ("cbor_rw", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
ocaml-cgr/test/test_cgr_gen.ml
··· 1 - let suite = ("cgr_gen", []) 1 + let suite = ("cgr_gen", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
ocaml-conpool/test/test_connection.ml
··· 6 6 (* Connection is an internal module that requires live Eio flows to test. 7 7 Integration tests are covered by the stress test. *) 8 8 9 - let suite = ("connection", []) 9 + let suite = ("connection", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
ocaml-oci/test/spec/test_layer.ml
··· 1 - let suite = ("layer", []) 1 + let suite = ("layer", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
ocaml-tar/test/test_tar.ml
··· 1 - let suite = ("tar", []) 1 + let suite = ("tar", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
ocaml-tar/test/test_tar_eio.ml
··· 1 - let suite = ("tar_eio", []) 1 + let suite = ("tar_eio", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
ocaml-tar/test/test_tar_gz.ml
··· 1 - let suite = ("tar_gz", []) 1 + let suite = ("tar_gz", [ Alcotest.test_case "noop" `Quick ignore ])
+1 -1
ocaml-tcpcl/test/test_tcpcl.ml
··· 59 59 match Tcpcl.message_type_of_int code with 60 60 | Some t' -> 61 61 Alcotest.(check int) 62 - (Format.asprintf "%a" Tcpcl.pp_message_type t) 62 + (Fmt.str "%a" Tcpcl.pp_message_type t) 63 63 code 64 64 (Tcpcl.message_type_to_int t') 65 65 | None -> Alcotest.fail "roundtrip failed")
+1 -1
ocaml-vlog/test/test_cli.ml
··· 24 24 Log.debug (fun m -> m "debug message"); 25 25 Trace.debug (fun m -> m "trace message") 26 26 27 - let suite = ("cli", []) 27 + let suite = ("cli", [ Alcotest.test_case "noop" `Quick ignore ]) 28 28 29 29 let cmd = 30 30 let doc = "Test CLI for vlog" in
+1 -1
ocaml-vlog/test/test_cli_no_json.ml
··· 16 16 Log.warn (fun m -> m "warning message"); 17 17 Log.info (fun m -> m "info message") 18 18 19 - let suite = ("cli_no_json", []) 19 + let suite = ("cli_no_json", [ Alcotest.test_case "noop" `Quick ignore ]) 20 20 21 21 let cmd = 22 22 let doc = "Test CLI for vlog with JSON disabled" in