Module Parsing_error

module Parsing_error: sig .. end

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