gazagnaire.org / crowbar
upstream: https://github.com/stedolan/crowbar
0
fork

Configure Feed

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

fix(tests): normalize suite names to lowercase snake_case (E617)

All test suite names now follow the convention: lowercase snake_case
matching the test filename. Changes:
- crowbar examples: 'crowbar' → filename (calendar/fpath/map/pprint/uunf)
- irmin: uppercase suites → lowercase
- memtrace: uppercase/mismatched → lowercase matching filename
- monopam/ocaml-agent/ocaml-aos/ocaml-conpool/ocaml-cookeio/ocaml-crow:
uppercase → lowercase
- ocaml-crypto: 'cipher' → 'crypto'
- ocaml-github-oauth: 'github-oauth' → 'github_oauth'
- ocaml-jsonwt/ocaml-linkedin/ocaml-merlin: mismatch fixed
- ocaml-oci: rename test_OS.ml/.mli → test_os.ml/.mli, suite 'OS' → 'os'
- ocaml-precommit: 'hooks' → 'precommit'
- ocaml-sexpt: 'dune_codec' → 'dune'
- ocaml-slack: 'md' → 'markdown'
- ocaml-sle: 'FCLTU' → 'fcltu'
- ocaml-space-packet: 'space-packet' → 'space_packet'
- ocaml-tls: 'tls-eio'/'tls-unix' → snake_case
- ocaml-tomlt: 'tomlt-*' → snake_case

Thomas Gazagnaire 9776e97b 334a0750

+5 -5
+1 -1
examples/calendar/test_calendar.ml
··· 23 23 map [const 0;const 0;int8;int8;int8;int8] C.Period.make 24 24 25 25 let suite = 26 - ("crowbar", 26 + ("calendar", 27 27 [ 28 28 test_case "calendar" [time; time] @@ fun t1 t2 -> 29 29 guard (C.compare t1 t2 < 0);
+1 -1
examples/fpath/test_fpath.ml
··· 9 9 Invalid_argument _ -> bad_test ()) 10 10 11 11 let suite = 12 - ("crowbar", 12 + ("fpath", 13 13 [ 14 14 test_case "segs" [fpath] @@ fun p -> 15 15 let np = normalize p in
+1 -1
examples/map/test_map.ml
··· 43 43 Map.union (fun k a b -> assert false) l (Map.map (fun v -> v + 42) r)))]) 44 44 45 45 let suite = 46 - ("crowbar", 46 + ("map", 47 47 [ 48 48 test_case "map" [map_gen] @@ fun m -> 49 49 check (check_map m);
+1 -1
examples/pprint/test_pprint.ml
··· 32 32 check_eq (del_ws s) (del_ws text) 33 33 34 34 let suite = 35 - ("crowbar", 35 + ("pprint", 36 36 [ 37 37 test_case "pprint" [doc] check_doc; 38 38 ])
+1 -1
examples/uunf/test_uunf.ml
··· 35 35 let unicode = with_printer pp_unicode unicode 36 36 37 37 let suite = 38 - ("crowbar", 38 + ("uunf", 39 39 [ 40 40 test_case "uunf" [unicode] @@ fun s -> 41 41 let nfc = norm `NFC s in