Module CamlinternalFormat

module CamlinternalFormat: sig .. end

---

let is_in_char_set: (CamlinternalFormatBasics.char_set, char) => bool;

let rev_char_set:
  CamlinternalFormatBasics.char_set => CamlinternalFormatBasics.char_set;

type mutable_char_set = bytes;

let create_char_set: unit => mutable_char_set;

let add_in_char_set: (mutable_char_set, char) => unit;

let freeze_char_set: mutable_char_set => CamlinternalFormatBasics.char_set;

type ('a, 'b, 'c, 'd, 'e, 'f) param_format_ebb = 

|	Param_format_EBB : ('x -> 'a0, 'b0, 'c0, 'd0, 'e0, 'f0) CamlinternalFormatBasics.fmt -> ('a0, 'b0, 'c0, 'd0, 'e0, 'f0) param_format_ebb

let param_format_of_ignored_format:
  (
    CamlinternalFormatBasics.ignored('a, 'b, 'c, 'd, 'y, 'x),
    CamlinternalFormatBasics.fmt('x, 'b, 'c, 'y, 'e, 'f)
  ) =>
  param_format_ebb('a, 'b, 'c, 'd, 'e, 'f);

type ('b, 'c) acc_formatting_gen = 

|	Acc_open_tag of ('b, 'c) acc
|	Acc_open_box of ('b, 'c) acc

type ('b, 'c) acc = 

|	Acc_formatting_lit of ('b, 'c) acc * CamlinternalFormatBasics.formatting_lit
|	Acc_formatting_gen of ('b, 'c) acc * ('b, 'c) acc_formatting_gen
|	Acc_string_literal of ('b, 'c) acc * string
|	Acc_char_literal of ('b, 'c) acc * char
|	Acc_data_string of ('b, 'c) acc * string
|	Acc_data_char of ('b, 'c) acc * char
|	Acc_delay of ('b, 'c) acc * ('b -> 'c)
|	Acc_flush of ('b, 'c) acc
|	Acc_invalid_arg of ('b, 'c) acc * string
|	End_of_acc

type ('a, 'b) heter_list = 

|	Cons : 'c * ('a0, 'b0) heter_list -> ('c -> 'a0, 'b0) heter_list
|	Nil : ('b1, 'b1) heter_list

type ('b, 'c, 'e, 'f) fmt_ebb = 

|	Fmt_EBB : ('a, 'b0, 'c0, 'd, 'e0, 'f0) CamlinternalFormatBasics.fmt -> ('b0, 'c0, 'e0, 'f0) fmt_ebb

let make_printf:
  (
    acc('b, 'c) => 'd,
    acc('b, 'c),
    CamlinternalFormatBasics.fmt('a, 'b, 'c, 'c, 'c, 'd)
  ) =>
  'a;

let make_iprintf:
  ('s => 'f, 's, CamlinternalFormatBasics.fmt('a, 'b, 'c, 'd, 'e, 'f)) => 'a;

let output_acc: (out_channel, acc(out_channel, unit)) => unit;

let bufput_acc: (Buffer.t, acc(Buffer.t, unit)) => unit;

let strput_acc: (Buffer.t, acc(unit, string)) => unit;

let type_format:
  (
    CamlinternalFormatBasics.fmt('x, 'b, 'c, 't, 'u, 'v),
    CamlinternalFormatBasics.fmtty('a, 'b, 'c, 'd, 'e, 'f)
  ) =>
  CamlinternalFormatBasics.fmt('a, 'b, 'c, 'd, 'e, 'f);

let fmt_ebb_of_string:
  (~legacy_behavior: bool=?, string) => fmt_ebb('b, 'c, 'e, 'f);

let format_of_string_fmtty:
  (string, CamlinternalFormatBasics.fmtty('a, 'b, 'c, 'd, 'e, 'f)) =>
  CamlinternalFormatBasics.format6('a, 'b, 'c, 'd, 'e, 'f);

let format_of_string_format:
  (string, CamlinternalFormatBasics.format6('a, 'b, 'c, 'd, 'e, 'f)) =>
  CamlinternalFormatBasics.format6('a, 'b, 'c, 'd, 'e, 'f);

let char_of_iconv: CamlinternalFormatBasics.int_conv => char;

let string_of_formatting_lit:
  CamlinternalFormatBasics.formatting_lit => string;

let string_of_fmtty:
  CamlinternalFormatBasics.fmtty('a, 'b, 'c, 'd, 'e, 'f) => string;

let string_of_fmt:
  CamlinternalFormatBasics.fmt('a, 'b, 'c, 'd, 'e, 'f) => string;

let open_box_of_string: string => (int, CamlinternalFormatBasics.block_type);

let symm:
  CamlinternalFormatBasics.fmtty_rel(
    'a1,
    'b1,
    'c1,
    'd1,
    'e1,
    'f1,
    'a2,
    'b2,
    'c2,
    'd2,
    'e2,
    'f2,
  ) =>
  CamlinternalFormatBasics.fmtty_rel(
    'a2,
    'b2,
    'c2,
    'd2,
    'e2,
    'f2,
    'a1,
    'b1,
    'c1,
    'd1,
    'e1,
    'f1,
  );

let trans:
  (
    CamlinternalFormatBasics.fmtty_rel(
      'a1,
      'b1,
      'c1,
      'd1,
      'e1,
      'f1,
      'a2,
      'b2,
      'c2,
      'd2,
      'e2,
      'f2,
    ),
    CamlinternalFormatBasics.fmtty_rel(
      'a2,
      'b2,
      'c2,
      'd2,
      'e2,
      'f2,
      'a3,
      'b3,
      'c3,
      'd3,
      'e3,
      'f3,
    )
  ) =>
  CamlinternalFormatBasics.fmtty_rel(
    'a1,
    'b1,
    'c1,
    'd1,
    'e1,
    'f1,
    'a3,
    'b3,
    'c3,
    'd3,
    'e3,
    'f3,
  );

let recast:
  (
    CamlinternalFormatBasics.fmt('a1, 'b1, 'c1, 'd1, 'e1, 'f1),
    CamlinternalFormatBasics.fmtty_rel(
      'a1,
      'b1,
      'c1,
      'd1,
      'e1,
      'f1,
      'a2,
      'b2,
      'c2,
      'd2,
      'e2,
      'f2,
    )
  ) =>
  CamlinternalFormatBasics.fmt('a2, 'b2, 'c2, 'd2, 'e2, 'f2);