type position
= Stdlib.Lexing.position
=
{
pos_fname : string; |
pos_lnum : int; |
pos_bol : int; |
pos_cnum : int; |
}
type t
=
{
}
val fname : t -> string
val none : t
val curr : Stdlib.Lexing.lexbuf -> t
val print_compact : Stdlib.Format.formatter -> t -> unit
val to_string : ?clean:bool -> t -> string option