`sig
type test_ctxt = OUnitTest.ctxt
type test_fun = OUnit2.test_ctxt -> unit
type test = OUnitTest.test
type test_length = OUnitTest.test_length
val assert_failure : string -> 'a
val assert_bool : string -> bool -> unit
val assert_string : string -> unit
val assert_command :
?exit_code:Unix.process_status ->
?sinput:char Stream.t ->
?foutput:(char Stream.t -> unit) ->
?use_stderr:bool ->
?backtrace:bool ->
?chdir:string ->
?env:string array ->
ctxt:OUnit2.test_ctxt -> string -> string list -> unit
val assert_equal :
?ctxt:OUnit2.test_ctxt ->
?cmp:('a -> 'a -> bool) ->
?printer:('a -> string) ->
?pp_diff:(Format.formatter -> 'a * 'a -> unit) ->
?msg:string -> 'a -> 'a -> unit
val assert_raises : ?msg:string -> exn -> (unit -> 'a) -> unit
val skip_if : bool -> string -> unit
val todo : string -> unit
val cmp_float : ?epsilon:float -> float -> float -> bool
val bracket :
(OUnit2.test_ctxt -> 'a) ->
('a -> OUnit2.test_ctxt -> unit) -> OUnit2.test_ctxt -> 'a
val bracket_tmpfile :
?prefix:string ->
?suffix:string ->
?mode:Pervasives.open_flag list ->
OUnit2.test_ctxt -> string * Pervasives.out_channel
val bracket_tmpdir :
?prefix:string -> ?suffix:string -> OUnit2.test_ctxt -> string
val with_bracket_chdir :
OUnit2.test_ctxt -> string -> (OUnit2.test_ctxt -> 'a) -> 'a
val ( >: ) : string -> OUnit2.test -> OUnit2.test
val ( >:: ) : string -> OUnit2.test_fun -> OUnit2.test
val ( >::: ) : string -> OUnit2.test list -> OUnit2.test
val test_case :
?length:OUnit2.test_length -> OUnit2.test_fun -> OUnit2.test
val test_list : OUnit2.test list -> OUnit2.test
type log_severity = [ `Error | `Info | `Warning ]
val logf :
OUnit2.test_ctxt ->
OUnit2.log_severity -> ('a, unit, string, unit) Pervasives.format4 -> 'a
val in_testdata_dir : OUnit2.test_ctxt -> string list -> string
val non_fatal : OUnit2.test_ctxt -> (OUnit2.test_ctxt -> unit) -> unit
module Conf :
sig
type 'a conf_t = string -> 'a -> Arg.doc -> OUnit2.test_ctxt -> 'a
val make_string : string OUnit2.Conf.conf_t
val make_string_opt : string option OUnit2.Conf.conf_t
val make_int : int OUnit2.Conf.conf_t
val make_float : float OUnit2.Conf.conf_t
val make_bool : bool OUnit2.Conf.conf_t
val make_exec : string -> OUnit2.test_ctxt -> string
end
val run_test_tt_main : ?exit:(int -> unit) -> OUnit2.test -> unit
end`