sig
  val is_in_char_set :
    Pervasives.CamlinternalFormatBasics.char_set -> char -> bool
  val rev_char_set :
    Pervasives.CamlinternalFormatBasics.char_set ->
    Pervasives.CamlinternalFormatBasics.char_set
  type mutable_char_set = bytes
  val create_char_set : unit -> CamlinternalFormat.mutable_char_set
  val add_in_char_set : CamlinternalFormat.mutable_char_set -> char -> unit
  val freeze_char_set :
    CamlinternalFormat.mutable_char_set ->
    Pervasives.CamlinternalFormatBasics.char_set
  val reader_nb_unifier_of_fmtty :
    ('a, 'b, 'c, 'd, 'e, 'f) Pervasives.CamlinternalFormatBasics.fmtty ->
    ('d, 'e, 'd, 'e) Pervasives.CamlinternalFormatBasics.reader_nb_unifier
  type ('a, 'b, 'c, 'd, 'e, 'f) param_format_ebb =
      Param_format_EBB :
        ('-> 'a, 'b, 'c, 'd, 'e, 'f)
        Pervasives.CamlinternalFormatBasics.fmt -> ('a, 'b, 'c, 'd, 'e, 'f)
                                                   CamlinternalFormat.param_format_ebb
  val param_format_of_ignored_format :
    ('a, 'b, 'c, 'd, 'y, 'x) Pervasives.CamlinternalFormatBasics.ignored ->
    ('x, 'b, 'c, 'y, 'e, 'f) Pervasives.CamlinternalFormatBasics.fmt ->
    ('a, 'b, 'c, 'd, 'e, 'f) CamlinternalFormat.param_format_ebb
  type ('b, 'c) acc =
      Acc_formatting of ('b, 'c) CamlinternalFormat.acc *
        Pervasives.CamlinternalFormatBasics.formatting
    | Acc_string of ('b, 'c) CamlinternalFormat.acc * string
    | Acc_char of ('b, 'c) CamlinternalFormat.acc * char
    | Acc_delay of ('b, 'c) CamlinternalFormat.acc * ('-> 'c)
    | Acc_flush of ('b, 'c) CamlinternalFormat.acc
    | Acc_invalid_arg of ('b, 'c) CamlinternalFormat.acc * string
    | End_of_acc
  type ('a, 'b) heter_list =
      Cons : 'c *
        ('a, 'b) CamlinternalFormat.heter_list -> ('-> 'a, 'b)
                                                  CamlinternalFormat.heter_list
    | Nil : ('b, 'b) CamlinternalFormat.heter_list
  type ('b, 'c, 'e, 'f) fmt_ebb =
      Fmt_EBB :
        ('a, 'b, 'c, 'd, 'e, 'f) Pervasives.CamlinternalFormatBasics.fmt -> 
        ('b, 'c, 'e, 'f) CamlinternalFormat.fmt_ebb
  val make_printf :
    ('-> ('b, 'c) CamlinternalFormat.acc -> 'd) ->
    '->
    ('b, 'c) CamlinternalFormat.acc ->
    ('a, 'b, 'c, 'c, 'c, 'd) Pervasives.CamlinternalFormatBasics.fmt -> 'a
  val output_acc :
    Pervasives.out_channel ->
    (Pervasives.out_channel, unit) CamlinternalFormat.acc -> unit
  val bufput_acc :
    Buffer.t -> (Buffer.t, unit) CamlinternalFormat.acc -> unit
  val strput_acc : Buffer.t -> (unit, string) CamlinternalFormat.acc -> unit
  val type_format :
    ('x, 'b, 'c, 't, 'u, 'v) Pervasives.CamlinternalFormatBasics.fmt ->
    ('a, 'b, 'c, 'd, 'e, 'f) Pervasives.CamlinternalFormatBasics.fmtty ->
    ('a, 'b, 'c, 'd, 'e, 'f) Pervasives.CamlinternalFormatBasics.fmt
  val fmt_ebb_of_string :
    string -> ('b, 'c, 'e, 'f) CamlinternalFormat.fmt_ebb
  val format_of_string_fmtty :
    string ->
    ('a, 'b, 'c, 'd, 'e, 'f) Pervasives.CamlinternalFormatBasics.fmtty ->
    ('a, 'b, 'c, 'd, 'e, 'f) Pervasives.CamlinternalFormatBasics.format6
  val format_of_string_format :
    string ->
    ('a, 'b, 'c, 'd, 'e, 'f) Pervasives.CamlinternalFormatBasics.format6 ->
    ('a, 'b, 'c, 'd, 'e, 'f) Pervasives.CamlinternalFormatBasics.format6
  val char_of_iconv : Pervasives.CamlinternalFormatBasics.int_conv -> char
  val string_of_formatting :
    Pervasives.CamlinternalFormatBasics.formatting -> string
  val string_of_fmtty :
    ('a, 'b, 'c, 'd, 'e, 'f) Pervasives.CamlinternalFormatBasics.fmtty ->
    string
  val string_of_fmt :
    ('a, 'b, 'c, 'd, 'e, 'f) Pervasives.CamlinternalFormatBasics.fmt ->
    string
end