type lexing_error = | Illegal_character of char| Illegal_escape of string| Unterminated_string| Keyword_as_label of string| Literal_overflow of string| Invalid_literal of string
type ast_error = | Not_expecting of Reason_migrate_parsetree.Ast_408.Location.t * string| Other_syntax_error of string| Variable_in_scope of Reason_migrate_parsetree.Ast_408.Location.t * string| Applicative_path of Reason_migrate_parsetree.Ast_408.Location.t
type parsing_error = stringexception Reason_error of reason_error * Reason_migrate_parsetree.Ast_408.Location.tval raise_error :
reason_error ->
Reason_migrate_parsetree.Ast_408.Location.t ->
unitval raise_fatal_error :
reason_error ->
Reason_migrate_parsetree.Ast_408.Location.t ->
'aval recover_non_fatal_errors :
(unit -> 'a) ->
('a, exn) Result.result
* (reason_error * Reason_migrate_parsetree.Ast_408.Location.t) listval recover_parser_error :
(Reason_migrate_parsetree.Ast_408.Location.t -> string -> 'a) ->
Reason_migrate_parsetree.Ast_408.Location.t ->
string ->
'a