ocaml-base-compiler 4.06.1

val transl_simple_type : 
  Env.t ->
  bool ->
  Parsetree.core_type ->
  Typedtree.core_type

val transl_simple_type_univars : 
  Env.t ->
  Parsetree.core_type ->
  Typedtree.core_type

val transl_simple_type_delayed : 
  Env.t ->
  Parsetree.core_type ->
  Typedtree.core_type * (unit -> unit)

val transl_type_scheme : Env.t -> Parsetree.core_type -> Typedtree.core_type

val reset_type_variables : unit -> unit

val type_variable : Location.t -> string -> Types.type_expr

val transl_type_param : Env.t -> Parsetree.core_type -> Typedtree.core_type

type variable_context

val narrow : unit -> variable_context

val widen : variable_context -> unit

exception Already_bound

type error =

| Unbound_type_variable of string
| Unbound_type_constructor of Longident.t
| Unbound_type_constructor_2 of Path.t
| Type_arity_mismatch of Longident.t * int * int
| Bound_type_variable of string
| Recursive_type
| Unbound_row_variable of Longident.t
| Type_mismatch of (Types.type_expr * Types.type_expr) list
| Alias_type_mismatch of (Types.type_expr * Types.type_expr) list
| Present_has_conjunction of string
| Present_has_no_type of string
| Constructor_mismatch of Types.type_expr * Types.type_expr
| Not_a_variant of Types.type_expr
| Variant_tags of string * string
| Invalid_variable_name of string
| Cannot_quantify of string * Types.type_expr
| Multiple_constraints_on_type of Longident.t
| Method_mismatch of string * Types.type_expr * Types.type_expr
| Unbound_value of Longident.t
| Unbound_constructor of Longident.t
| Unbound_label of Longident.t
| Unbound_module of Longident.t
| Unbound_class of Longident.t
| Unbound_modtype of Longident.t
| Unbound_cltype of Longident.t
| Ill_typed_functor_application of Longident.t
| Illegal_reference_to_recursive_module
| Access_functor_as_structure of Longident.t
| Apply_structure_as_functor of Longident.t
| Cannot_scrape_alias of Longident.t * Path.t
| Opened_object of Path.t option
| Not_an_object of Types.type_expr

exception Error of Location.t * Env.t * error

val report_error : Env.t -> Format.formatter -> error -> unit

val transl_modtype_longident : 
  (Location.t -> Env.t -> Longident.t -> Path.t) Pervasives.ref

val transl_modtype : 
  (Env.t -> Parsetree.module_type -> Typedtree.module_type) Pervasives.ref

val create_package_mty : 
  Location.t ->
  Env.t ->
  Parsetree.package_type ->
  (Longident.t Asttypes.loc * Parsetree.core_type) list * Parsetree.module_type

val find_type : 
  Env.t ->
  Location.t ->
  Longident.t ->
  Path.t * Types.type_declaration

val find_constructor : 
  Env.t ->
  Location.t ->
  Longident.t ->
  Types.constructor_description

val find_all_constructors : 
  Env.t ->
  Location.t ->
  Longident.t ->
  (Types.constructor_description * (unit -> unit)) list

val find_label : Env.t -> Location.t -> Longident.t -> Types.label_description

val find_all_labels : 
  Env.t ->
  Location.t ->
  Longident.t ->
  (Types.label_description * (unit -> unit)) list

val find_value : 
  Env.t ->
  Location.t ->
  Longident.t ->
  Path.t * Types.value_description

val find_class : 
  Env.t ->
  Location.t ->
  Longident.t ->
  Path.t * Types.class_declaration

val find_module : 
  Env.t ->
  Location.t ->
  Longident.t ->
  Path.t * Types.module_declaration

val lookup_module : ?load:bool -> Env.t -> Location.t -> Longident.t -> Path.t

val find_modtype : 
  Env.t ->
  Location.t ->
  Longident.t ->
  Path.t * Types.modtype_declaration

val find_class_type : 
  Env.t ->
  Location.t ->
  Longident.t ->
  Path.t * Types.class_type_declaration

val unbound_constructor_error : Env.t -> Longident.t Location.loc -> 'a

val unbound_label_error : Env.t -> Longident.t Location.loc -> 'a

package ocaml-base-compiler