add test case for intrinsic elements (#923)

Author: zth

analysis/tests/src/CompletionJsx.res

@@ -51,3 +51,13 @@ module CompWithoutJsxPpx = {
 
 // <h1 hidd
 //         ^com
+
+module IntrinsicElementLowercase = {
+  type props = {name?: string, age?: int}
+
+  @module("react")
+  external make: (@as("mesh") _, props) => Jsx.element = "createElement"
+}
+
+// <IntrinsicElementLowercase
+//                            ^com

analysis/tests/src/expected/CompletionJsx.res.txt

@@ -516,3 +516,30 @@ Path PervasivesU.JsxDOM.domProps
     "documentation": null
   }]
 
+Complete src/CompletionJsx.res 61:30
+posCursor:[61:30] posNoWhite:[61:28] Found expr:[61:4->61:29]
+JSX <IntrinsicElementLowercase:[61:4->61:29] > _children:None
+Completable: Cjsx([IntrinsicElementLowercase], "", [])
+Package opens Pervasives.JsxModules.place holder
+Resolved opens 1 pervasives
+Path IntrinsicElementLowercase.make
+[{
+    "label": "name",
+    "kind": 4,
+    "tags": [],
+    "detail": "option<string>",
+    "documentation": null
+  }, {
+    "label": "age",
+    "kind": 4,
+    "tags": [],
+    "detail": "option<int>",
+    "documentation": null
+  }, {
+    "label": "key",
+    "kind": 4,
+    "tags": [],
+    "detail": "string",
+    "documentation": null
+  }]
+