sig exception DuringParsing of Stdlib.Lexing.position exception DuringLexing of Stdlib.Lexing.position * string exception DuringIO of string val string_of_error : exn -> string end