val load_cmt : string -> (Cmt_format.cmt_infos, string) Stdlib.Result.t
type lookup_res = {
loc : Location.t;
path : Path.t option;
typ : Types.type_expr;
def : Location.t option;
}
val pos_in_loc : (string * int) -> Location.t -> bool
val apply_mapper : Untypeast.mapper -> Cmt_format.binary_part -> unit
val lookup_in_binary_part :
(string * int) ->
Cmt_format.binary_part ->
lookup_res option
val cmt_parts : Cmt_format.cmt_infos -> Cmt_format.binary_part list
val lookup_by_pos : (string * int) -> Cmt_format.cmt_infos -> lookup_res option
val fold_exp_idents :
('a -> (Path.t * Location.t * Location.t option) -> 'a) ->
'b ->
Cmt_format.cmt_infos ->
'c