sig
  type stag
  val string_of_stag : Transitioning.Format.stag -> string
  val stag_of_string : string -> Transitioning.Format.stag
  type formatter_stag_functions = {
    mark_open_stag : Transitioning.Format.stag -> string;
    mark_close_stag : Transitioning.Format.stag -> string;
    print_open_stag : Transitioning.Format.stag -> unit;
    print_close_stag : Transitioning.Format.stag -> unit;
  }
  val pp_set_formatter_stag_functions :
    Stdlib.Format.formatter ->
    Transitioning.Format.formatter_stag_functions -> unit
  val pp_get_formatter_stag_functions :
    Stdlib.Format.formatter ->
    unit -> Transitioning.Format.formatter_stag_functions
  val pp_open_stag :
    Stdlib.Format.formatter -> Transitioning.Format.stag -> unit
  val pp_close_stag : Stdlib.Format.formatter -> unit -> unit
end