Module Base__.Source_code_position0

module T : sig ... end

include T

type t = Caml.Lexing.position = {

pos_fname : string;

pos_lnum : int;

pos_bol : int;

pos_cnum : int;

}

val t_of_sexp : Base__.Sexplib.Sexp.t ‑> t

val sexp_of_t : t ‑> Base__.Sexplib.Sexp.t

val hash_fold_t : Base__.Ppx_hash_lib.Std.Hash.state ‑> t ‑> Base__.Ppx_hash_lib.Std.Hash.state

val hash : t ‑> Base__.Ppx_hash_lib.Std.Hash.hash_value

val compare : t ‑> t ‑> int

include sig ... end

type comparator_witness = Base__Comparator.Make(T).comparator_witness

val comparator : (T.t, comparator_witness) Base__Comparator.comparator

val make_location_string : pos_fname:string ‑> pos_lnum:int ‑> pos_cnum:int ‑> pos_bol:int ‑> string

val to_string : Caml.Lexing.position ‑> string

val sexp_of_t : Caml.Lexing.position ‑> Base.Sexp.t