sig val pp_stack : Buffer.t -> int -> unit val fmt_stack : Format.formatter -> int -> unit val pp_backtrace : Buffer.t -> unit -> unit val fmt_backtrace : Format.formatter -> unit -> unit end