Btype (ocaml.Btype)

module TypeSet : Set.S with type elt = Types.type_expr

module TypeMap : Map.S with type key = Types.type_expr

module TypeHash : Hashtbl.S with type key = Types.type_expr

val generic_level : int

val newty2 : int -> Types.type_desc -> Types.type_expr

val newgenty : Types.type_desc -> Types.type_expr

val newgenvar : ?name:string -> unit -> Types.type_expr

val is_Tvar : Types.type_expr -> bool

val is_Tunivar : Types.type_expr -> bool

val is_Tconstr : Types.type_expr -> bool

val dummy_method : Asttypes.label

val repr : Types.type_expr -> Types.type_expr

val field_kind_repr : Types.field_kind -> Types.field_kind

val commu_repr : Types.commutable -> Types.commutable

val row_repr : Types.row_desc -> Types.row_desc

val row_field_repr : Types.row_field -> Types.row_field

val row_field : Asttypes.label -> Types.row_desc -> Types.row_field

val row_more : Types.row_desc -> Types.type_expr

val is_fixed : Types.row_desc -> bool

val row_fixed : Types.row_desc -> bool

val fixed_explanation : Types.row_desc -> Types.fixed_explanation option

val merge_fixed_explanation : Types.fixed_explanation option -> Types.fixed_explanation option -> Types.fixed_explanation option

val static_row : Types.row_desc -> bool

val hash_variant : Asttypes.label -> int

val proxy : Types.type_expr -> Types.type_expr

val row_of_type : Types.type_expr -> Types.type_expr

val has_constr_row : Types.type_expr -> bool

val is_row_name : string -> bool

val is_constr_row : allow_ident:bool -> Types.type_expr -> bool

val iter_type_expr : (Types.type_expr -> unit) -> Types.type_expr -> unit

val fold_type_expr : ('a -> Types.type_expr -> 'a) -> 'a -> Types.type_expr -> 'a

val iter_row : (Types.type_expr -> unit) -> Types.row_desc -> unit

val fold_row : ('a -> Types.type_expr -> 'a) -> 'a -> Types.row_desc -> 'a

val iter_abbrev : (Types.type_expr -> unit) -> Types.abbrev_memo -> unit

type type_iterators = {

it_signature : type_iterators -> Types.signature -> unit;

it_signature_item : type_iterators -> Types.signature_item -> unit;

it_value_description : type_iterators -> Types.value_description -> unit;

it_type_declaration : type_iterators -> Types.type_declaration -> unit;

it_extension_constructor : type_iterators -> Types.extension_constructor -> unit;

it_module_declaration : type_iterators -> Types.module_declaration -> unit;

it_modtype_declaration : type_iterators -> Types.modtype_declaration -> unit;

it_class_declaration : type_iterators -> Types.class_declaration -> unit;

it_class_type_declaration : type_iterators -> Types.class_type_declaration -> unit;

it_functor_param : type_iterators -> Types.functor_parameter -> unit;

it_module_type : type_iterators -> Types.module_type -> unit;

it_class_type : type_iterators -> Types.class_type -> unit;

it_type_kind : type_iterators -> Types.type_kind -> unit;

it_do_type_expr : type_iterators -> Types.type_expr -> unit;

it_type_expr : type_iterators -> Types.type_expr -> unit;

it_path : Path.t -> unit;

}

val type_iterators : type_iterators

val unmark_iterators : type_iterators

val copy_type_desc : ?keep_names:bool -> (Types.type_expr -> Types.type_expr) -> Types.type_desc -> Types.type_desc

val copy_row : (Types.type_expr -> Types.type_expr) -> bool -> Types.row_desc -> bool -> Types.type_expr -> Types.row_desc

val copy_kind : Types.field_kind -> Types.field_kind

module For_copy : sig ... end

val lowest_level : int

val pivot_level : int

val mark_type : Types.type_expr -> unit

val mark_type_node : Types.type_expr -> unit

val mark_type_params : Types.type_expr -> unit

val unmark_type : Types.type_expr -> unit

val unmark_type_decl : Types.type_declaration -> unit

val unmark_extension_constructor : Types.extension_constructor -> unit

val unmark_class_type : Types.class_type -> unit

val unmark_class_signature : Types.class_signature -> unit

val find_expans : Asttypes.private_flag -> Path.t -> Types.abbrev_memo -> Types.type_expr option

val cleanup_abbrev : unit -> unit

val memorize_abbrev : Types.abbrev_memo ref -> Asttypes.private_flag -> Path.t -> Types.type_expr -> Types.type_expr -> unit

val forget_abbrev : Types.abbrev_memo ref -> Path.t -> unit

val is_optional : Asttypes.arg_label -> bool

val label_name : Asttypes.arg_label -> Asttypes.label

val prefixed_label_name : Asttypes.arg_label -> Asttypes.label

val extract_label : Asttypes.label -> (Asttypes.arg_label * 'a) list -> (Asttypes.arg_label * 'a * bool * (Asttypes.arg_label * 'a) list) option

type snapshot

val snapshot : unit -> snapshot

val backtrack : snapshot -> unit

val undo_compress : snapshot -> unit

val link_type : Types.type_expr -> Types.type_expr -> unit

val set_type_desc : Types.type_expr -> Types.type_desc -> unit

val set_level : Types.type_expr -> int -> unit

val set_scope : Types.type_expr -> int -> unit

val set_name : (Path.t * Types.type_expr list) option ref -> (Path.t * Types.type_expr list) option -> unit

val set_row_field : Types.row_field option ref -> Types.row_field -> unit

val set_univar : Types.type_expr option ref -> Types.type_expr -> unit

val set_kind : Types.field_kind option ref -> Types.field_kind -> unit

val set_commu : Types.commutable ref -> Types.commutable -> unit

val set_typeset : TypeSet.t ref -> TypeSet.t -> unit

val print_raw : (Format.formatter -> Types.type_expr -> unit) ref

val iter_type_expr_kind : (Types.type_expr -> unit) -> Types.type_kind -> unit

val iter_type_expr_cstr_args : (Types.type_expr -> unit) -> Types.constructor_arguments -> unit

val map_type_expr_cstr_args : (Types.type_expr -> Types.type_expr) -> Types.constructor_arguments -> Types.constructor_arguments