Ast_typ_uncurry (melange.Melange_ppx_lib.Ast_typ

type typ = Melange_compiler_libs.Parsetree.core_type;

type cxt('a) =
  Melange_compiler_libs.Ast_helper.loc =>
  Melange_compiler_libs.Ast_mapper.mapper =>
  'a;

type uncurry_type_gen = cxt((Asttypes.arg_label => typ => typ => typ));

let to_uncurry_type: uncurry_type_gen;

syntax :

int -> int -> int [@bs]

let to_method_type: uncurry_type_gen;

syntax

method : int -> itn -> int

let to_method_callback_type: uncurry_type_gen;

syntax:

'obj -> int -> int [@bs.this]

let generate_method_type: 
  Melange_compiler_libs.Location.t =>
  Melange_compiler_libs.Ast_mapper.mapper =>
  ?alias_type:Melange_compiler_libs.Parsetree.core_type =>
  string =>
  Asttypes.arg_label =>
  Melange_compiler_libs.Parsetree.pattern =>
  Melange_compiler_libs.Parsetree.expression =>
  Melange_compiler_libs.Parsetree.core_type;

let generate_arg_type: 
  Melange_compiler_libs.Location.t =>
  Melange_compiler_libs.Ast_mapper.mapper =>
  string =>
  Asttypes.arg_label =>
  Melange_compiler_libs.Parsetree.pattern =>
  Melange_compiler_libs.Parsetree.expression =>
  Melange_compiler_libs.Parsetree.core_type;