type location = Printexc.location = {filename : string;line_number : int;start_char : int;end_char : int;
}val default_uncaught_exception_handler : exn -> raw_backtrace -> unitval to_string_default : exn -> stringval use_printers : exn -> string optionval set_uncaught_exception_handler : (exn -> raw_backtrace -> unit) -> unitval exn_slot_id : exn -> intval exn_slot_name : exn -> stringval get_backtrace : unit -> stringval record_backtrace : bool -> unitval backtrace_status : unit -> boolval register_printer : (exn -> string option) -> unitval to_string : exn -> stringval print : ('a -> 'b) -> 'a -> 'bval catch : ('a -> 'b) -> 'a -> 'b