module Parsing_error: sig .. end
sig
end
val curr_lexbuf : string Pervasives.ref
string Pervasives.ref
type loc = {
file :string;
string
line :int;
int
start :int;
stop :int;
val loc_of_pos : Lexing.lexbuf -> loc
Lexing.lexbuf -> loc
val error : loc -> 'a -> string
loc -> 'a -> string