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