sig
type t =
Pre_sexp.Parse_pos.t = private {
mutable text_line : int;
mutable text_char : int;
mutable global_offset : int;
mutable buf_pos : int;
}
val create :
?text_line:int ->
?text_char:int ->
?buf_pos:int -> ?global_offset:int -> unit -> Sexp_intf.S.Parse_pos.t
val with_buf_pos :
Sexp_intf.S.Parse_pos.t -> int -> Sexp_intf.S.Parse_pos.t
end