package ocaml-base-compiler
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 type_variable : Location.t -> string -> Types.type_expr
val transl_type_param : Env.t -> Parsetree.core_type -> Typedtree.core_type
val narrow : unit -> variable_context
val widen : variable_context -> unit
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
| Invalid_variable_name of string
| Cannot_quantify of string * Types.type_expr
| Multiple_constraints_on_type of Longident.t
| Repeated_method_label of string
| 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
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
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>