Module Odoc_model.Compat

type visibility =
  1. | Exported
  2. | Hidden
module Aliasability : sig ... end
type module_type =
  1. | Mty_ident of Path.t
  2. | Mty_signature of signature
  3. | Mty_functor of functor_parameter * module_type
  4. | Mty_alias of Path.t
  5. | Mty_strengthen of module_type * Path.t * Aliasability.t
and functor_parameter =
  1. | Unit
  2. | Named of Ident.t option * module_type
and module_presence =
  1. | Mp_present
  2. | Mp_absent
and signature = signature_item list
and module_declaration = {
  1. md_type : module_type;
  2. md_attributes : Parsetree.attributes;
  3. md_loc : Location.t;
}
and modtype_declaration = {
  1. mtd_type : module_type option;
  2. mtd_attributes : Parsetree.attributes;
  3. mtd_loc : Location.t;
}
val opt : ('a -> 'b) -> 'a option -> 'b option
val signature : Types.signature -> signature
val signature_item : Types.signature_item -> signature_item
val visibility : Types.visibility -> visibility
val module_type : Types.module_type -> module_type
val aliasability : Types.Aliasability.t -> Aliasability.t
val functor_parameter : Types.functor_parameter -> functor_parameter
val module_presence : Types.module_presence -> module_presence
val module_declaration : Types.module_declaration -> module_declaration
val modtype_declaration : Types.modtype_declaration -> modtype_declaration
type shape = Shape.t
type 'a shape_uid_map = 'a Shape.Uid.Map.t
type uid_to_loc = Warnings.loc Types.Uid.Tbl.t
val empty_map : 'a Shape.Uid.Map.t
val shape_info_of_cmt_infos : Cmt_format.cmt_infos -> (shape * uid_to_loc) option
val compunit_name : Compilation_unit.t -> string
val required_compunit_names : Cmo_format.compilation_unit_descr -> string list