sig
val run_check_at_exit : bool Pervasives.ref
val critical : float Pervasives.ref
val report_open_files : unit -> unit
val report_on_exn : exn -> unit
val get_num_open_fds : unit -> int
val percent_fds_in_use : unit -> float
val ounit_tests : unit -> OUnit.test
end