ocaml-containers/tests/core/t_eq.ml
Simon Cruanes 10865eaced reformat
2022-07-04 13:36:06 -04:00

9 lines
211 B
OCaml

open CCEqual
module T = (val Containers_testlib.make ~__FILE__ ())
include T;;
q
Q.(
let p = small_list (pair small_int bool) in
pair p p)
(fun (l1, l2) -> (list (pair int bool)) l1 l2 = (l1 = l2))