Env (odoc.Odoc_xref2.Env)

type lookup_unit_result =

| Forward_reference
| Found of Odoc_model.Lang.Compilation_unit.t
| Not_found

type lookup_page_result = Odoc_model.Lang.Page.t option

type root =

| Resolved of Odoc_model.Root.t * Odoc_model.Paths.Identifier.Module.t * Odoc_xref2.Component.Module.t
| Forward

type resolver = {

open_units : string list;
lookup_unit : string -> lookup_unit_result;
lookup_page : string -> lookup_page_result;

}

type lookup_type =

| Module of Odoc_model.Paths.Identifier.Path.Module.t
| ModuleType of Odoc_model.Paths.Identifier.ModuleType.t
| RootModule of string * [ `Forward | `Resolved of Digest.t ] option
| ModuleByName of string * Odoc_model.Paths.Identifier.Path.Module.t
| FragmentRoot of int

module LookupTypeSet : sig ... end

val pp_lookup_type_list : Format.formatter -> lookup_type list -> unit

type t

val is_linking : t -> bool

val with_recorded_lookups : t -> (t -> 'a) -> LookupTypeSet.t * 'a

val set_resolver : t -> resolver -> t

val has_resolver : t -> bool

val id : t -> int

val empty : t

val add_fragment_root : Odoc_xref2.Component.Signature.t -> t -> t

val add_module : 
  Odoc_model.Paths.Identifier.Path.Module.t ->
  Odoc_xref2.Component.Module.t Odoc_xref2.Component.Delayed.t ->
  Odoc_xref2.Component.CComment.docs ->
  t ->
  t

val add_type : 
  Odoc_model.Paths.Identifier.Type.t ->
  Odoc_xref2.Component.TypeDecl.t ->
  t ->
  t

val add_module_type : 
  Odoc_model.Paths.Identifier.Path.ModuleType.t ->
  Odoc_xref2.Component.ModuleType.t ->
  t ->
  t

val add_value : 
  Odoc_model.Paths.Identifier.Value.t ->
  Odoc_xref2.Component.Value.t ->
  t ->
  t

val add_label : 
  Odoc_model.Paths.Identifier.Label.t ->
  Odoc_xref2.Component.Label.t ->
  t ->
  t

val add_class : 
  Odoc_model.Paths.Identifier.Class.t ->
  Odoc_xref2.Component.Class.t ->
  t ->
  t

val add_class_type : 
  Odoc_model.Paths.Identifier.ClassType.t ->
  Odoc_xref2.Component.ClassType.t ->
  t ->
  t

val add_exception : 
  Odoc_model.Paths.Identifier.Exception.t ->
  Odoc_xref2.Component.Exception.t ->
  t ->
  t

val add_extension_constructor : 
  Odoc_model.Paths.Identifier.Extension.t ->
  Odoc_xref2.Component.Extension.Constructor.t ->
  Odoc_xref2.Component.Extension.t ->
  t ->
  t

val add_docs : Odoc_model.Comment.docs -> t -> t

val add_comment : Odoc_model.Comment.docs_or_stop -> t -> t

val add_method : 
  Odoc_model.Paths.Identifier.Method.t ->
  Odoc_xref2.Component.Method.t ->
  t ->
  t

val add_module_functor_args : 
  Odoc_xref2.Component.Module.t ->
  Odoc_model.Paths.Identifier.Path.Module.t ->
  t ->
  t

val add_module_type_functor_args : 
  Odoc_xref2.Component.ModuleType.t ->
  Odoc_model.Paths.Identifier.ModuleType.t ->
  t ->
  t

val lookup_fragment_root : t -> (int * Odoc_xref2.Component.Signature.t) option

val lookup_page : string -> t -> Odoc_model.Lang.Page.t option

val lookup_unit : string -> t -> lookup_unit_result option

val module_of_unit : 
  Odoc_model.Lang.Compilation_unit.t ->
  Odoc_xref2.Component.Module.t

val lookup_root_module : string -> t -> root option

type 'a scope constraint 'a = [< Odoc_xref2.Component.Element.any ]

type !'a maybe_ambiguous =
  ('a, [ `Ambiguous of 'a * 'a list | `Not_found ]) Result.result

val lookup_by_name : 
  [< Odoc_xref2.Component.Element.any ] as 'a scope ->
  string ->
  t ->
  'a maybe_ambiguous

val lookup_by_id : 
  [< Odoc_xref2.Component.Element.any ] as 'a scope ->
  [< Odoc_model.Paths.Identifier.t_pv ] Odoc_model.Paths.Identifier.id ->
  t ->
  'a option

val s_any : Odoc_xref2.Component.Element.any scope

val s_signature : Odoc_xref2.Component.Element.signature scope

val s_module : Odoc_xref2.Component.Element.module_ scope

val s_module_type : Odoc_xref2.Component.Element.module_type scope

val s_type : Odoc_xref2.Component.Element.type_ scope

val s_datatype : Odoc_xref2.Component.Element.datatype scope

val s_class : Odoc_xref2.Component.Element.class_ scope

val s_class_type : Odoc_xref2.Component.Element.class_type scope

val s_value : Odoc_xref2.Component.Element.value scope

val s_label : Odoc_xref2.Component.Element.label scope

val s_constructor : Odoc_xref2.Component.Element.constructor scope

val s_exception : Odoc_xref2.Component.Element.exception_ scope

val s_extension : Odoc_xref2.Component.Element.extension scope

val s_field : Odoc_xref2.Component.Element.field scope

val s_label_parent : Odoc_xref2.Component.Element.label_parent scope

val s_fragment_type_parent : 
  Odoc_xref2.Component.Element.fragment_type_parent scope

val add_functor_parameter : Odoc_model.Lang.FunctorParameter.t -> t -> t

val open_class_signature : Odoc_model.Lang.ClassSignature.t -> t -> t

val open_signature : Odoc_model.Lang.Signature.t -> t -> t

val open_type_substitution : Odoc_model.Lang.TypeDecl.t -> t -> t

val open_module_substitution : Odoc_model.Lang.ModuleSubstitution.t -> t -> t

val open_module_type_substitution : 
  Odoc_model.Lang.ModuleTypeSubstitution.t ->
  t ->
  t

val open_page : Odoc_model.Lang.Page.t -> t -> t

val env_of_unit : 
  Odoc_model.Lang.Compilation_unit.t ->
  linking:bool ->
  resolver ->
  t

val env_of_page : Odoc_model.Lang.Page.t -> resolver -> t

val env_for_reference : resolver -> t

val env_for_testing : linking:bool -> t

val inherit_resolver : t -> t

val len : int ref

val n : int ref

val verify_lookups : t -> LookupTypeSet.t -> bool