Fix module-member access in JSX tags

reasonml · May 15, 2018 · 59ded6f · 59ded6f
1 parent 5f6adb9
commit 59ded6f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/reason-parser/reason_lexer.mll b/src/reason-parser/reason_lexer.mll
@@ -532,7 +532,7 @@ rule token = parse
   | "[|" { LBRACKETBAR }
   | "[<" { LBRACKETLESS }
   | "[>" { LBRACKETGREATER }
-  | "<" lowercase identchar* {
+  | "<" (uppercase identchar* '.')* lowercase identchar* {
     let buf = Lexing.lexeme lexbuf in
     LESSIDENT (String.sub buf 1 (String.length buf - 1))
   }