A collection of experiments, more or less organized.
0
fork

Configure Feed

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

Start tests in `pidgin`

xvw 230d1b0c 1fae5335

+23 -1
+1
dune-project
··· 16 16 (allow_empty) 17 17 (depends 18 18 (ocaml (>= 5.4.0)) 19 + (ppx_expect :with-test) 19 20 (mdx :with-test) 20 21 (utop :with-dev-setup) 21 22 (ocamlformat :with-dev-setup)
+1 -1
lib/pidgin/kind.ml
··· 127 127 |> Repr.fields_to_assoc 128 128 |> List.map (fun (k, v) -> k, from_repr v) 129 129 |> record 130 - | Repr.List _ -> assert false 130 + | Repr.List xs -> List (from_list xs) 131 131 132 132 and from_list xs = 133 133 match
+1
souk.opam
··· 11 11 depends: [ 12 12 "dune" {>= "3.21"} 13 13 "ocaml" {>= "5.4.0"} 14 + "ppx_expect" {with-test} 14 15 "mdx" {with-test} 15 16 "utop" {with-dev-setup} 16 17 "ocamlformat" {with-dev-setup}
+7
test/pidgin/dune
··· 1 + (library 2 + (name pidgin_test) 3 + (inline_tests) 4 + (flags (:standard) -open Pidgin) 5 + (libraries pidgin) 6 + (preprocess 7 + (pps ppx_expect)))
+13
test/pidgin/kind_test.ml
··· 1 + let dump_kind x = x |> Kind.from_repr |> Kind.to_string |> print_endline 2 + 3 + let%expect_test "kind of null" = 4 + let repr = Repr.null () in 5 + repr |> dump_kind; 6 + [%expect {| null |}] 7 + ;; 8 + 9 + let%expect_test "kind of unit" = 10 + let repr = Repr.unit () in 11 + repr |> dump_kind; 12 + [%expect {| unit |}] 13 + ;;