Up

module Browse

: sig
#
val deepest_before : Lexing.position -> BrowseT.t list -> BrowseT.t option
#
val nearest_before : Lexing.position -> BrowseT.t list -> BrowseT.t option
#
val enclosing : Lexing.position -> BrowseT.t list -> BrowseT.t list
#
val all_occurrences : Path.t -> BrowseT.t -> (BrowseT.t * Path.t Location.loc list) list
#
val of_typer_contents : [ ] list -> BrowseT.t list
#
val all_constructor_occurrences : BrowseT.t * [
| `Description of Types.constructor_description
] -> BrowseT.t -> BrowseT.t Location.loc list
#
val annotate_tail_calls : BrowseT.t list -> (BrowseT.t * Protocol.is_tail_position) list
#
val annotate_tail_calls_from_leaf : BrowseT.t list -> (BrowseT.t * Protocol.is_tail_position) list
end