second approach to inlining dicts

Author: zth

jscomp/others/js_dict.res

@@ -27,6 +27,8 @@
 /** The dict type */
 type t<'a> = dict<'a>
 
+external _unsafe_create: array<(string, 'a)> => dict<'a> = "?createDict"
+
 /** The key type, an alias of string */
 type key = string
 

jscomp/others/js_dict.resi

@@ -41,6 +41,8 @@ mostly used with the Js_json.t type.
 */
 type t<'a> = dict<'a>
 
+external _unsafe_create: array<(string, 'a)> => dict<'a> = "?createDict"
+
 /**
   The type for dictionary keys. This means that dictionaries *must* use `string`s as their keys.
 */

jscomp/test/DictTests.js

@@ -7,3 +7,9 @@ let dictCreationCanBeInlined = Js.Dict.fromArray([
 external imaginaryExternalArgs: array<(string, string)> = "imaginary"
 
 let dictCreationCanNotBeInlined = Js.Dict.fromArray(imaginaryExternalArgs)
+
+let dictCreationCanBeInlined2 = Js.Dict._unsafe_create([
+  ("name", "hello"),
+  ("age", "what"),
+  ("more", "stuff"),
+])