some changes could be improved

* MoreLabels.js (there is no need to expand the module)
* js_typed_array2.js (empty module could be shared)
* class4_test.js (“restricted_point’”), ocaml_re_test.js (Re_automata_Category[“++”], sexpm.js
```
var ID_MONAD = {
  return: $$return,
  ">>=": $great$great$eq
};
```

Author: bobzhang

jscomp/test/array_test.js

@@ -350,6 +350,6 @@ var array_suites = /* :: */[
   array_suites_001
 ];
 
-Mt.from_pair_suites("Array_test", /* array_suites */array_suites);
+Mt.from_pair_suites("Array_test", array_suites);
 
 /*  Not a pure module */

jscomp/test/basic_module_test.js

@@ -8,14 +8,16 @@ var Mt_global = require("./mt_global.js");
 
 var count = /* record */[/* contents */0];
 
-var M = /* module */[/* Set */Offset.M[/* Set */1]];
+var M = {
+  Set: Offset.M.Set
+};
 
 function test(set) {
-  count[0] = Curry._1(M[/* Set */0][/* cardinal */18], set) + count[0] | 0;
+  count[0] = Curry._1(M.Set.cardinal, set) + count[0] | 0;
   return /* () */0;
 }
 
-test(Curry._1(Offset.M[/* Set */1][/* singleton */4], "42"));
+test(Curry._1(Offset.M.Set.singleton, "42"));
 
 var suites = /* record */[/* contents : [] */0];
 

jscomp/test/block_alias_test.js

@@ -17,30 +17,32 @@ function b(loc, x) {
   return Mt.bool_suites(test_id, suites, loc, x);
 }
 
-var Block$1 = /* module */[];
+var Block$1 = { };
 
 var v0 = /* A */Block.__(1, [
     0,
     1
   ]);
 
-var Block$2 = /* module */[];
+var Block$2 = { };
 
 var v1 = /* A */Block.__(1, [
     0,
     1
   ]);
 
-var N = /* module */[
-  /* Block */Block$2,
-  /* v1 */v1
-];
+var N = {
+  Block: Block$2,
+  v1: v1
+};
 
-var Caml_obj$1 = /* module */[];
+var Caml_obj$1 = { };
 
-var List$1 = /* module */[];
+var List$1 = { };
 
-var V = /* module */[/* List */List$1];
+var V = {
+  List: List$1
+};
 
 var f = Caml_obj.caml_equal;
 

jscomp/test/bs_auto_uncurry.js

@@ -3,9 +3,9 @@
 var Curry = require("../../lib/js/curry.js");
 var Caml_splice_call = require("../../lib/js/caml_splice_call.js");
 
-var Curry$1 = /* module */[];
+var Curry$1 = { };
 
-var Block = /* module */[];
+var Block = { };
 
 var xbs = Array.prototype.map.call(/* array */[
       1,

jscomp/test/bs_hashtbl_string_test.js

@@ -104,10 +104,10 @@ function bench2(m) {
 
 function bench3(m) {
   var empty = {
-    cmp: m[/* cmp */0],
+    cmp: m.cmp,
     data: Belt_MapDict.empty
   };
-  var cmp = m[/* cmp */0];
+  var cmp = m.cmp;
   var table = empty.data;
   for(var i = 0; i <= 1000000; ++i){
     table = Belt_MapDict.set(table, String(i), i, cmp);

jscomp/test/bs_map_set_dict_test.js

@@ -28,7 +28,7 @@ var Icmp = Belt_Id.comparable(Caml_primitive.caml_int_compare);
 var Icmp2 = Belt_Id.comparable(Caml_primitive.caml_int_compare);
 
 var m0 = {
-  cmp: Icmp[/* cmp */0],
+  cmp: Icmp.cmp,
   data: Belt_MapDict.empty
 };
 
@@ -37,12 +37,12 @@ var I2 = Belt_Id.comparable((function (x, y) {
       }));
 
 var m = {
-  cmp: Icmp2[/* cmp */0],
+  cmp: Icmp2.cmp,
   data: Belt_MapDict.empty
 };
 
 var m2 = {
-  cmp: I2[/* cmp */0],
+  cmp: I2.cmp,
   data: Belt_MapDict.empty
 };
 
@@ -53,30 +53,30 @@ Belt_Map.getId(m2);
 var m_dict = Belt_Map.getId(m);
 
 for(var i = 0; i <= 100000; ++i){
-  data = Belt_MapDict.set(data, i, i, m_dict[/* cmp */0]);
+  data = Belt_MapDict.set(data, i, i, m_dict.cmp);
 }
 
 var data$1 = data;
 
 var newm = {
-  cmp: m_dict[/* cmp */0],
+  cmp: m_dict.cmp,
   data: data$1
 };
 
 console.log(newm);
 
-var m11 = Belt_MapDict.set(Belt_MapDict.empty, 1, 1, Icmp[/* cmp */0]);
+var m11 = Belt_MapDict.set(Belt_MapDict.empty, 1, 1, Icmp.cmp);
 
 console.log(m11);
 
 var v = {
-  cmp: Icmp2[/* cmp */0],
+  cmp: Icmp2.cmp,
   data: Belt_SetDict.empty
 };
 
 var m_dict$1 = Belt_Map.getId(m);
 
-var cmp = m_dict$1[/* cmp */0];
+var cmp = m_dict$1.cmp;
 
 var data$2 = v.data;
 

jscomp/test/bs_poly_map_test.js

@@ -34,7 +34,7 @@ function setOfArray(x) {
 
 function emptyMap(param) {
   return {
-          cmp: Icmp[/* cmp */0],
+          cmp: Icmp.cmp,
           data: Belt_MapDict.empty
         };
 }
@@ -196,7 +196,7 @@ function acc(m, is) {
 }
 
 var m = {
-  cmp: Icmp[/* cmp */0],
+  cmp: Icmp.cmp,
   data: Belt_MapDict.empty
 };
 
@@ -214,7 +214,7 @@ b("File \"bs_poly_map_test.ml\", line 103, characters 4-11", Belt_Map.eq(m1, Bel
           })));
 
 var v0 = {
-  cmp: Icmp[/* cmp */0],
+  cmp: Icmp.cmp,
   data: Belt_MapDict.empty
 };
 
@@ -269,14 +269,14 @@ var match$4 = Belt_Map.get(v4, -10);
 b("File \"bs_poly_map_test.ml\", line 128, characters 4-11", match$4 !== undefined ? match$4 === 0 : false);
 
 var map = Belt_Map.remove({
-      cmp: Icmp[/* cmp */0],
+      cmp: Icmp.cmp,
       data: Belt_MapDict.empty
     }, 0);
 
 b("File \"bs_poly_map_test.ml\", line 129, characters 4-11", Belt_MapDict.isEmpty(map.data));
 
 var map$1 = Belt_Map.removeMany({
-      cmp: Icmp[/* cmp */0],
+      cmp: Icmp.cmp,
       data: Belt_MapDict.empty
     }, /* array */[0]);
 

jscomp/test/bs_poly_mutable_set_test.js

@@ -30,7 +30,7 @@ function fromArray(param) {
 
 function empty(param) {
   return {
-          cmp: IntCmp[/* cmp */0],
+          cmp: IntCmp.cmp,
           data: Belt_internalAVLset.empty
         };
 }
@@ -146,7 +146,7 @@ eq("File \"bs_poly_mutable_set_test.ml\", line 67, characters 5-12", indeedAded,
 eq("File \"bs_poly_mutable_set_test.ml\", line 68, characters 5-12", Belt_internalAVLset.size(v.data), 1501);
 
 b("File \"bs_poly_mutable_set_test.ml\", line 69, characters 4-11", Belt_MutableSet.isEmpty({
-          cmp: IntCmp[/* cmp */0],
+          cmp: IntCmp.cmp,
           data: Belt_internalAVLset.empty
         }));
 
@@ -235,12 +235,12 @@ var dd = Belt_MutableSet.intersect(aa$2, bb$2);
 b("File \"bs_poly_mutable_set_test.ml\", line 111, characters 4-11", Belt_MutableSet.eq(dd, fromArray(Array_data_util.randomRange(40, 100))));
 
 b("File \"bs_poly_mutable_set_test.ml\", line 112, characters 4-11", Belt_MutableSet.eq(Belt_MutableSet.intersect(fromArray(Array_data_util.randomRange(0, 20)), fromArray(Array_data_util.randomRange(21, 40))), {
-          cmp: IntCmp[/* cmp */0],
+          cmp: IntCmp.cmp,
           data: Belt_internalAVLset.empty
         }));
 
 b("File \"bs_poly_mutable_set_test.ml\", line 118, characters 4-11", Belt_MutableSet.eq(Belt_MutableSet.intersect(fromArray(Array_data_util.randomRange(21, 40)), fromArray(Array_data_util.randomRange(0, 20))), {
-          cmp: IntCmp[/* cmp */0],
+          cmp: IntCmp.cmp,
           data: Belt_internalAVLset.empty
         }));
 

jscomp/test/bs_poly_set_test.js

@@ -136,7 +136,7 @@ var u24 = Belt_Set.union(u18, u17);
 var u25 = Belt_Set.add(u22, 59);
 
 var u26 = Belt_Set.add({
-      cmp: IntCmp[/* cmp */0],
+      cmp: IntCmp.cmp,
       data: Belt_SetDict.empty
     }, 3);
 
@@ -183,28 +183,28 @@ b("File \"bs_poly_set_test.ml\", line 86, characters 4-11", undefined === Belt_S
 eq("File \"bs_poly_set_test.ml\", line 88, characters 5-12", Belt_SetDict.size(u25.data), 60);
 
 var m = {
-  cmp: IntCmp[/* cmp */0],
+  cmp: IntCmp.cmp,
   data: Belt_SetDict.empty
 };
 
 b("File \"bs_poly_set_test.ml\", line 89, characters 4-11", Belt_SetDict.minimum(m.data) === undefined);
 
 var m$1 = {
-  cmp: IntCmp[/* cmp */0],
+  cmp: IntCmp.cmp,
   data: Belt_SetDict.empty
 };
 
 b("File \"bs_poly_set_test.ml\", line 90, characters 4-11", Belt_SetDict.maximum(m$1.data) === undefined);
 
 var m$2 = {
-  cmp: IntCmp[/* cmp */0],
+  cmp: IntCmp.cmp,
   data: Belt_SetDict.empty
 };
 
 b("File \"bs_poly_set_test.ml\", line 91, characters 4-11", Belt_SetDict.minUndefined(m$2.data) === undefined);
 
 var m$3 = {
-  cmp: IntCmp[/* cmp */0],
+  cmp: IntCmp.cmp,
   data: Belt_SetDict.empty
 };
 
@@ -394,7 +394,7 @@ var m$4 = Belt_Set.keep(a, (function (x) {
 b("File \"bs_poly_set_test.ml\", line 153, characters 4-11", Belt_SetDict.isEmpty(m$4.data));
 
 var match$5 = Belt_Set.split({
-      cmp: IntCmp[/* cmp */0],
+      cmp: IntCmp.cmp,
       data: Belt_SetDict.empty
     }, 0);
 

jscomp/test/caml_format_test.js

@@ -1538,15 +1538,15 @@ var string_of_lambda = Curry._1(Format.asprintf(/* Format */[
           "%a"
         ]), pr_lambda);
 
-var Lambda_suites = /* module */[
-  /* ident */ident,
-  /* kwd */kwd,
-  /* pr_exp0 */pr_exp0,
-  /* pr_app */pr_app,
-  /* pr_other_applications */pr_other_applications,
-  /* pr_lambda */pr_lambda,
-  /* string_of_lambda */string_of_lambda
-];
+var Lambda_suites = {
+  ident: ident,
+  kwd: kwd,
+  pr_exp0: pr_exp0,
+  pr_app: pr_app,
+  pr_other_applications: pr_other_applications,
+  pr_lambda: pr_lambda,
+  string_of_lambda: string_of_lambda
+};
 
 var lambda_suites = /* array */[
   /* tuple */[