?curry_constr:bool ->
?comments:bool ->
unit ->
object ('a)
  val curry_constr : bool
  val first_match_case : bool
  val mode : [> `comments | `no_comments ]
  val pipe : bool
  val semi : bool
  val semisep : Camlp4.Printers.OCamlr.Make.PP_o.sep
  method andsep : Camlp4.Printers.OCamlr.Make.PP_o.sep
  method anti : Format.formatter -> string -> unit
  method apply_expr :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.expr -> unit
  method binding :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.binding -> unit
  method class_declaration :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.class_expr -> unit
  method class_expr :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.class_expr -> unit
  method class_params :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.ctyp -> unit
  method class_sig_item :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.class_sig_item -> unit
  method class_str_item :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.class_str_item -> unit
  method class_type :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.class_type -> unit
  method constrain :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.ctyp *
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.ctyp -> unit
  method constructor_type :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.ctyp -> unit
  method ctyp :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.ctyp -> unit
  method ctyp1 :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.ctyp -> unit
  method direction_flag :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.direction_flag -> unit
  method dot_expr :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.expr -> unit
  method private dot_ident :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.ident -> unit
  method expr :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.expr -> unit
  method expr_list :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.expr list -> unit
  method expr_list_cons :
    bool ->
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.expr -> unit
  method fun_binding :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.fun_binding -> unit
  method functor_arg :
    Format.formatter ->
    string * Camlp4.Printers.OCamlr.Make.PP_o.Ast.module_type -> unit
  method functor_args :
    Format.formatter ->
    (string * Camlp4.Printers.OCamlr.Make.PP_o.Ast.module_type) list -> unit
  method ident :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.ident -> unit
  method implem :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.str_item -> unit
  method interf :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.sig_item -> unit
  method match_case :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.match_case -> unit
  method match_case_aux :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.match_case -> unit
  method mk_expr_list :
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.expr ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.expr list *
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.expr option
  method mk_patt_list :
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.patt ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.patt list *
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.patt option
  method module_expr :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.module_expr -> unit
  method module_expr_get_functor_args :
    (string * Camlp4.Printers.OCamlr.Make.PP_o.Ast.module_type) list ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.module_expr ->
    (string * Camlp4.Printers.OCamlr.Make.PP_o.Ast.module_type) list *
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.module_expr *
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.module_type option
  method module_rec_binding :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.module_binding -> unit
  method module_type :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.module_type -> unit
  method mutable_flag :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.mutable_flag -> unit
  method node :
    Format.formatter ->
    'b -> ('b -> Camlp4.Printers.OCamlr.Make.PP_o.Loc.t) -> unit
  method numeric : Format.formatter -> string -> string -> unit
  method override_flag :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.override_flag -> unit
  method patt :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.patt -> unit
  method patt1 :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.patt -> unit
  method patt2 :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.patt -> unit
  method patt3 :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.patt -> unit
  method patt4 :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.patt -> unit
  method patt5 :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.patt -> unit
  method patt_class_expr_fun_args :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.patt *
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.class_expr -> unit
  method patt_expr_fun_args :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.fun_binding *
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.expr -> unit
  method patt_tycon :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.patt -> unit
  method print_comments_before :
    Camlp4.Printers.OCamlr.Make.PP_o.Loc.t -> Format.formatter -> unit
  method private_flag :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.private_flag -> unit
  method quoted_string : Format.formatter -> string -> unit
  method raise_match_failure :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Loc.t -> unit
  method rec_flag :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.rec_flag -> unit
  method record_binding :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.rec_binding -> unit
  method reset : 'a
  method reset_semi : 'a
  method semisep : Camlp4.Printers.OCamlr.Make.PP_o.sep
  method seq :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.expr -> unit
  method set_comments : bool -> 'a
  method set_curry_constr : bool -> 'a
  method private set_first_match_case : 'a
  method set_loc_and_comments : 'a
  method set_semisep : Camlp4.Printers.OCamlr.Make.PP_o.sep -> 'a
  method sig_item :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.sig_item -> unit
  method simple_ctyp :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.ctyp -> unit
  method simple_expr :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.expr -> unit
  method simple_module_expr :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.module_expr -> unit
  method simple_patt :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.patt -> unit
  method str_item :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.str_item -> unit
  method string : Format.formatter -> string -> unit
  method sum_type :
    Format.formatter -> Camlp4.Printers.OCamlr.Make.PP_o.Ast.ctyp -> unit
  method type_params :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.ctyp list -> unit
  method under_pipe : 'a
  method under_semi : 'a
  method private unset_first_match_case : 'a
  method value_let : string
  method value_val : string
  method var : Format.formatter -> string -> unit
  method virtual_flag :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.virtual_flag -> unit
  method with_constraint :
    Format.formatter ->
    Camlp4.Printers.OCamlr.Make.PP_o.Ast.with_constr -> unit
end