Module `Base__.Source_code_position0`

module Int = Base__.Int0

module String = Base__.String0

module T : sig ... end

include T

type t = Base__.Import.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 : Base__.Import.Caml.Lexing.position -> string
val sexp_of_t : Base__.Import.Caml.Lexing.position -> Base.Sexp.t