typo Mls_{P->p}arser
This commit is contained in:
parent
a7e34a0a17
commit
de16b4f178
1 changed files with 1 additions and 1 deletions
|
@ -22,7 +22,7 @@ let parse parsing_fun lexing_fun lexbuf =
|
|||
with
|
||||
| Mls_lexer.Lexical_error(err, pos1, pos2) ->
|
||||
lexical_error err (Loc(pos1, pos2))
|
||||
| Mls_Parser.Error ->
|
||||
| Mls_parser.Error ->
|
||||
let pos1 = Lexing.lexeme_start lexbuf
|
||||
and pos2 = Lexing.lexeme_end lexbuf in
|
||||
let l = Loc(pos1,pos2) in
|
||||
|
|
Loading…
Reference in a new issue