type t = {file : string; |
start_line : int; |
start_column : int; |
stop_line : int; |
stop_column : int; |
}
val mk : string -> int -> int -> int -> int -> tval mk_pair : string -> (int * int) -> (int * int) -> tval mk_pos : Lexing.position -> Lexing.position -> tval equal : 'a -> 'a -> boolval pp : Format.formatter -> t -> unitval pp_opt : Format.formatter -> t option -> unitval pp_to_string : (Format.formatter -> 'a -> unit) -> 'a -> stringval to_string_opt : t option -> string
val set_file : Lexing.lexbuf -> string -> unitval get_file : Lexing.lexbuf -> stringval of_lexbuf : Lexing.lexbuf -> t