Module Js_of_ocaml_compiler.Loc
type line = {
pos_fname : string;
pos_lnum : int;
pos_bol : int;
}
type t =
| SameLine of {
line : line;
cnum_start : int;
offset : int;
}
| MultiLine of {
line_start : line;
cnum_start : int;
line_end : line;
offset : int;
}
val filename : t -> string
val line_end' : t -> line
val create :
?last_line:line ->
Stdlib.Lexing.position ->
Stdlib.Lexing.position ->
t
val p1 : t -> Stdlib.Lexing.position
val p2 : t -> Stdlib.Lexing.position