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 compare : t ‑> t ‑> int

val hash_fold_t : Base.Hash.state ‑> t ‑> Base.Hash.state

val hash : t ‑> Base.Hash.hash_value

val t_of_sexp : Base.Sexp.t ‑> t

val sexp_of_t : t ‑> Base.Sexp.t

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