Typemod (ocaml.Typemod)

module Signature_names : sig ... end

val type_module : 
  Env.t ->
  Parsetree.module_expr ->
  Typedtree.module_expr * Shape.t

val type_structure : 
  Env.t ->
  Parsetree.structure ->
  Typedtree.structure * Types.signature * Signature_names.t * Shape.t * Env.t

val type_toplevel_phrase : 
  Env.t ->
  Parsetree.structure ->
  Typedtree.structure * Types.signature * Signature_names.t * Shape.t * Env.t

val type_implementation : 
  string ->
  string ->
  string ->
  Env.t ->
  Parsetree.structure ->
  Typedtree.implementation

val type_interface : Env.t -> Parsetree.signature -> Typedtree.signature

val transl_signature : Env.t -> Parsetree.signature -> Typedtree.signature

val check_nongen_signature : Env.t -> Types.signature -> unit

val modtype_of_package : 
  Env.t ->
  Location.t ->
  Path.t ->
  (Longident.t * Types.type_expr) list ->
  Types.module_type

val path_of_module : Typedtree.module_expr -> Path.t option

val save_signature : 
  string ->
  Typedtree.signature ->
  string ->
  string ->
  Env.t ->
  Cmi_format.cmi_infos ->
  unit

val package_units : 
  Env.t ->
  string list ->
  string ->
  string ->
  Typedtree.module_coercion

val initial_env : 
  loc:Location.t ->
  safe_string:bool ->
  initially_opened_module:string option ->
  open_implicit_modules:string list ->
  Env.t

module Sig_component_kind : sig ... end

type hiding_error =

| Illegal_shadowing of {
1. shadowed_item_id : Ident.t;
2. shadowed_item_kind : Sig_component_kind.t;
3. shadowed_item_loc : Location.t;
4. shadower_id : Ident.t;
5. user_id : Ident.t;
6. user_kind : Sig_component_kind.t;
7. user_loc : Location.t;
}
| Appears_in_signature of {
1. opened_item_id : Ident.t;
2. opened_item_kind : Sig_component_kind.t;
3. user_id : Ident.t;
4. user_kind : Sig_component_kind.t;
5. user_loc : Location.t;
}

type error =

| Cannot_apply of Types.module_type
| Not_included of Includemod.explanation
| Cannot_eliminate_dependency of Types.module_type
| Signature_expected
| Structure_expected of Types.module_type
| With_no_component of Longident.t
| With_mismatch of Longident.t * Includemod.explanation
| With_makes_applicative_functor_ill_typed of Longident.t * Path.t * Includemod.explanation
| With_changes_module_alias of Longident.t * Ident.t * Path.t
| With_cannot_remove_constrained_type
| Repeated_name of Sig_component_kind.t * string
| Non_generalizable of Types.type_expr
| Non_generalizable_module of Types.module_type
| Implementation_is_required of string
| Interface_not_compiled of string
| Not_allowed_in_functor_body
| Not_a_packed_module of Types.type_expr
| Incomplete_packed_module of Types.type_expr
| Scoping_pack of Longident.t * Types.type_expr
| Recursive_module_require_explicit_type
| Apply_generative
| Cannot_scrape_alias of Path.t
| Cannot_scrape_package_type of Path.t
| Badly_formed_signature of string * Typedecl.error
| Cannot_hide_id of hiding_error
| Invalid_type_subst_rhs
| Unpackable_local_modtype_subst of Path.t
| With_cannot_remove_packed_modtype of Path.t * Types.module_type

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

exception Error_forward of Location.error

val report_error : Env.t -> loc:Location.t -> error -> Location.error