Annotate jsx regions with the correct breadcrumbs.

Results in the correct errors being reported after the jsx.

Fixes #120

Author: Iwan

src/res_core.ml

@@ -2520,6 +2520,7 @@ and parseJsx p =
   | _ ->
     parseJsxName p
   in
+  Parser.eatBreadcrumb p;
   {jsxExpr with pexp_attributes = [jsxAttr]}
 
 (*
@@ -2547,7 +2548,6 @@ and parseJsxFragment p =
  *   |  lident = ?jsx_expr
  *)
 and parseJsxProp p =
-  Parser.leaveBreadcrumb p Grammar.JsxAttribute;
   match p.Parser.token with
   | Question | Lident _ ->
     let optional = Parser.optional p Question in

tests/parsing/errors/expressions/__snapshots__/parse.spec.js.snap

@@ -300,6 +300,30 @@ switch result {
 
 
 
+========================================================"
+`;
+
+exports[`implementation.res 1`] = `
+"=====Parsetree==========================================
+module InstallerDownload =
+  struct
+    let make () = ((div ~children:[] ())[@ns.braces ][@JSX ])[@@react.component
+                                                               ]
+  end
+module LicenseList = struct  end
+=====Errors=============================================
+
+  Syntax error!
+  parsing/errors/expressions/implementation.res 7:1  
+  5 │   }
+  6 │ }
+  7 │ }
+  8 │ module LicenseList = {
+  9 │ 
+  
+  I'm not sure what to parse here when looking at \\"}\\".
+
+
 ========================================================"
 `;
 

tests/parsing/errors/expressions/implementation.res

@@ -0,0 +1,10 @@
+module InstallerDownload = {
+  @react.component
+  let make = () => {
+    <div />
+  }
+}
+}
+module LicenseList = {
+
+}