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:('-> '-> bool) ->
    ?printer:('-> string) ->
    ?pp_diff:(Format.formatter -> 'a * '-> unit) ->
    ?msg:string -> '-> '-> 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) ->
    ('-> 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 -> '-> 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