We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent bc76fd7 commit 908640aCopy full SHA for 908640a
interpreter/text/parse.ml
@@ -31,8 +31,6 @@ let make (type a) (start : _ -> _ -> a) : (module S with type t = a) =
31
with
32
| Parser.Error ->
33
raise (Syntax (convert_pos buf, "unexpected token"))
34
- | Syntax (region, s) when region <> Source.no_region ->
35
- raise (Syntax (convert_pos buf, s))
36
37
let parse_string s =
38
parse "string" (Lexing.from_string ~with_positions:true s)
0 commit comments