Types used in the generated code
type 'a test_pred = ?here:Lexing.position Base.list ‑> ?message:Base.string ‑> ('a ‑> Base.bool) ‑> 'a ‑> Base.unittype 'a test_eq = ?here:Lexing.position Base.list ‑> ?message:Base.string ‑> ?equal:('a ‑> 'a ‑> Base.bool) ‑> 'a ‑> 'a ‑> Base.unittype 'a test_result = ?here:Lexing.position Base.list ‑> ?message:Base.string ‑> ?equal:('a ‑> 'a ‑> Base.bool) ‑> expect:'a ‑> 'a ‑> Base.unitFunctions called by the generated code
val test_pred : pos:Base.string ‑> sexpifier:('a ‑> Base.Sexp.t) ‑> here:Lexing.position Base.list ‑> ?message:Base.string ‑> ('a ‑> Base.bool) ‑> 'a ‑> Base.unitval test_eq : pos:Base.string ‑> sexpifier:('a ‑> Base.Sexp.t) ‑> comparator:('a ‑> 'a ‑> Base.int) ‑> here:Lexing.position Base.list ‑> ?message:Base.string ‑> ?equal:('a ‑> 'a ‑> Base.bool) ‑> 'a ‑> 'a ‑> Base.unitval test_result : pos:Base.string ‑> sexpifier:('a ‑> Base.Sexp.t) ‑> comparator:('a ‑> 'a ‑> Base.int) ‑> here:Lexing.position Base.list ‑> ?message:Base.string ‑> ?equal:('a ‑> 'a ‑> Base.bool) ‑> expect:'a ‑> got:'a ‑> Base.unitval set_diff_function : (from_:Base.string ‑> to_:Base.string ‑> Base.unit) Base.option ‑> Base.unitCalled to set/unset the diff function, used by test_result