ocaml-containers/tests/core/t_eq.ml
Simon Cruanes 91cc585d5f
fix (#485)
2026-02-09 21:16:31 -05:00

9 lines
211 B
OCaml

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