Utils (bindoj.Bindoj

val locmk : ?loc:Ppxlib.Ast_helper.loc -> 'a -> 'b Ppxlib.loc

val strloc : 
  ?loc:Ppxlib.Ast_helper.loc ->
  Ppxlib.label ->
  Ppxlib.label Ppxlib.Ast_helper.with_loc

val lidloc : 
  ?loc:Ppxlib.Ast_helper.loc ->
  string ->
  Ppxlib.Longident.t Ppxlib.loc

val typcons : 
  ?loc:Ppxlib_ast__Ast_helper_lite.loc ->
  ?attrs:Ppxlib_ast__Ast_helper_lite.attrs ->
  ?args:Astlib.Ast_500.Parsetree.core_type list ->
  string ->
  Astlib.Ast_500.Parsetree.core_type

val pvar : 
  ?loc:Ppxlib_ast__Ast_helper_lite.loc ->
  ?attrs:Ppxlib_ast__Ast_helper_lite.attrs ->
  Ppxlib.label ->
  Astlib.Ast_500.Parsetree.pattern

val evar : 
  ?open_:string ->
  ?loc:Ppxlib_ast__Ast_helper_lite.loc ->
  ?attrs:Ppxlib_ast__Ast_helper_lite.attrs ->
  string ->
  Astlib.Ast_500.Parsetree.expression

val elist : 
  ?loc:Ppxlib.Location.t ->
  Ppxlib_ast.Ast.expression list ->
  Ppxlib_ast.Ast.expression

val plist : 
  ?loc:Ppxlib.Location.t ->
  Ppxlib_ast.Ast.pattern list ->
  Ppxlib_ast.Ast.pattern

val attr : 
  string ->
  Astlib.Ast_500.Parsetree.expression ->
  Astlib.Ast_500.Parsetree.attribute

val doc_attribute : 
  [> `docstr of string | `nodoc ] ->
  Astlib.Ast_500.Parsetree.attribute list

val show_attribute : Astlib.Ast_500.Parsetree.attribute list

val warning_attribute : string -> Astlib.Ast_500.Parsetree.attribute list

val sprintf : ('a, Stdlib.Format.formatter, unit, string) Stdlib.format4 -> 'b

val escape_as_constructor_name : string -> string

val to_rec_flag : Bindoj_base.Type_desc.type_decl -> Ppxlib.rec_flag

val type_name_with_codec : 
  ?codec:Bindoj_base.Type_desc.Coretype.codec ->
  string ->
  string