sig
  val pass : ('-> 'b) -> '-> 'b
  val catch : ('-> 'b) -> '-> 'b
  val to_string : exn -> string
  val print_backtrace : 'BatInnerIO.output -> unit
  val get_backtrace : unit -> string
  val record_backtrace : bool -> unit
  val backtrace_status : unit -> bool
  val register_printer : (exn -> string option) -> unit
  val print : 'BatInnerIO.output -> exn -> unit
  type raw_backtrace = Printexc.raw_backtrace
  val get_raw_backtrace : unit -> BatPrintexc.raw_backtrace
  val print_raw_backtrace :
    Pervasives.out_channel -> BatPrintexc.raw_backtrace -> unit
  val raw_backtrace_to_string : BatPrintexc.raw_backtrace -> string
  val get_callstack : int -> BatPrintexc.raw_backtrace
end