Module Compiler.IntervalTree

type 'a t
val find : Elpi_parser.Ast.Loc.t -> 'a t -> (Elpi_parser.Ast.Loc.t * 'a) list
val pp : (Format.formatter -> 'a -> unit) -> Format.formatter -> 'a t -> unit