Skip to content

Commit 640a5b2

Browse files
committed
snapshot js changes
1 parent d544436 commit 640a5b2

File tree

107 files changed

+19199
-11605
lines changed

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

107 files changed

+19199
-11605
lines changed

jscomp/test/406_primitive_test.js

+40
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,8 @@
11
'use strict';
22

33
var Mt = require("./mt.js");
4+
var Caml_exceptions = require("../../lib/js/caml_exceptions.js");
5+
var Caml_js_exceptions = require("../../lib/js/caml_js_exceptions.js");
46

57
var suites = /* record */[/* contents : [] */0];
68

@@ -10,9 +12,47 @@ function eq(loc, x, y) {
1012
return Mt.eq_suites(test_id, suites, loc, x, y);
1113
}
1214

15+
var v = 32;
16+
17+
eq("File \"406_primitive_test.ml\", line 18, characters 6-13", v, 32);
18+
19+
var backend_type = /* Other */["BS"];
20+
21+
var max_array_length = 2147483647;
22+
23+
eq("File \"406_primitive_test.ml\", line 29, characters 6-13", backend_type, /* Other */["BS"]);
24+
25+
function f(param) {
26+
var A = Caml_exceptions.create("A");
27+
try {
28+
for(var i = 0; i <= 200; ++i){
29+
if (i === 10) {
30+
throw [
31+
A,
32+
0
33+
];
34+
}
35+
36+
}
37+
return /* () */0;
38+
}
39+
catch (raw_exn){
40+
var exn = Caml_js_exceptions.internalToOCamlException(raw_exn);
41+
if (exn[0] === A) {
42+
return /* () */0;
43+
} else {
44+
throw exn;
45+
}
46+
}
47+
}
48+
1349
Mt.from_pair_suites("406_primitive_test", suites[0]);
1450

1551
exports.suites = suites;
1652
exports.test_id = test_id;
1753
exports.eq = eq;
54+
exports.v = v;
55+
exports.backend_type = backend_type;
56+
exports.max_array_length = max_array_length;
57+
exports.f = f;
1858
/* Not a pure module */

jscomp/test/adt_optimize_test.js

+8-9
Original file line numberDiff line numberDiff line change
@@ -107,21 +107,20 @@ function f8(param) {
107107

108108
function f9(param) {
109109
if (typeof param === "number") {
110-
switch (param) {
111-
case /* T60 */0 :
112-
case /* T61 */1 :
113-
case /* T62 */2 :
114-
return 1;
115-
default:
116-
return 3;
110+
if (param === /* T63 */3) {
111+
return 3;
112+
} else {
113+
return 1;
117114
}
118115
} else {
119116
switch (param.tag | 0) {
120117
case /* T64 */0 :
121118
case /* T65 */1 :
122119
return 2;
123-
default:
124-
return 3;
120+
case /* T66 */2 :
121+
case /* T68 */3 :
122+
return 3;
123+
125124
}
126125
}
127126
}

jscomp/test/array_test.js

+6-2
Original file line numberDiff line numberDiff line change
@@ -241,7 +241,9 @@ var array_suites_001 = /* :: */[
241241
26,
242242
27,
243243
28
244-
], Caml_obj.caml_equal)
244+
], (function (prim, prim$1) {
245+
return prim === prim$1;
246+
}))
245247
]);
246248
})
247249
],
@@ -282,7 +284,9 @@ var array_suites_001 = /* :: */[
282284
18,
283285
19,
284286
20
285-
], Caml_obj.caml_equal)
287+
], (function (prim, prim$1) {
288+
return prim === prim$1;
289+
}))
286290
]);
287291
})
288292
],

jscomp/test/basic_module_test.js

+1-6
Original file line numberDiff line numberDiff line change
@@ -3,17 +3,12 @@
33
var Mt = require("./mt.js");
44
var Curry = require("../../lib/js/curry.js");
55
var Offset = require("./offset.js");
6-
var Pr6726 = require("./pr6726.js");
76
var Mt_global = require("./mt_global.js");
87

98
var count = /* record */[/* contents */0];
109

11-
var M = {
12-
$$Set: Offset.M.$$Set
13-
};
14-
1510
function test(set) {
16-
count[0] = Curry._1(M.$$Set.cardinal, set) + count[0] | 0;
11+
count[0] = Offset.$$Set.cardinal(set) + count[0] | 0;
1712
return /* () */0;
1813
}
1914

jscomp/test/bigarray_test.js

+1-2
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,5 @@
11
'use strict';
22

3-
var Bigarray = require("../../lib/js/bigarray.js");
43
var Caml_int32 = require("../../lib/js/caml_int32.js");
54
var Caml_external_polyfill = require("../../lib/js/caml_external_polyfill.js");
65

@@ -43,4 +42,4 @@ exports.sum = sum;
4342
exports.init = init;
4443
exports.init2 = init2;
4544
exports.init3 = init3;
46-
/* Bigarray Not a pure module */
45+
/* No side effect */

jscomp/test/bs_array_test.js

+5-3
Original file line numberDiff line numberDiff line change
@@ -1211,7 +1211,9 @@ b("File \"bs_array_test.ml\", line 273, characters 4-11", !Belt_Array.some(/* ar
12111211
b("File \"bs_array_test.ml\", line 274, characters 4-11", !Belt_Array.eq(/* array */[
12121212
0,
12131213
1
1214-
], /* array */[1], Caml_obj.caml_equal));
1214+
], /* array */[1], (function (prim, prim$1) {
1215+
return prim === prim$1;
1216+
})));
12151217

12161218
var c$1 = /* record */[/* contents */0];
12171219

@@ -1499,7 +1501,7 @@ b("File \"bs_array_test.ml\", line 327, characters 4-11", Belt_Array.cmp(/* arra
14991501
1,
15001502
2,
15011503
3
1502-
], Caml_obj.caml_compare) < 0);
1504+
], Caml_primitive.caml_int_compare) < 0);
15031505

15041506
b("File \"bs_array_test.ml\", line 328, characters 4-11", Belt_Array.cmp(/* array */[
15051507
0,
@@ -1510,7 +1512,7 @@ b("File \"bs_array_test.ml\", line 328, characters 4-11", Belt_Array.cmp(/* arra
15101512
1,
15111513
2,
15121514
3
1513-
], Caml_obj.caml_compare) > 0);
1515+
], Caml_primitive.caml_int_compare) > 0);
15141516

15151517
b("File \"bs_array_test.ml\", line 329, characters 4-11", Belt_Array.cmp(/* array */[
15161518
1,

jscomp/test/bs_list_test.js

+51-19
Original file line numberDiff line numberDiff line change
@@ -1011,7 +1011,9 @@ b("File \"bs_list_test.ml\", line 182, characters 4-11", Belt_List.hasAssoc(/* :
10111011
/* [] */0
10121012
]
10131013
]
1014-
], 2, Caml_obj.caml_equal));
1014+
], 2, (function (prim, prim$1) {
1015+
return prim === prim$1;
1016+
})));
10151017

10161018
b("File \"bs_list_test.ml\", line 183, characters 4-11", !Belt_List.hasAssoc(/* :: */[
10171019
/* tuple */[
@@ -1031,7 +1033,9 @@ b("File \"bs_list_test.ml\", line 183, characters 4-11", !Belt_List.hasAssoc(/*
10311033
/* [] */0
10321034
]
10331035
]
1034-
], 4, Caml_obj.caml_equal));
1036+
], 4, (function (prim, prim$1) {
1037+
return prim === prim$1;
1038+
})));
10351039

10361040
b("File \"bs_list_test.ml\", line 184, characters 4-11", Belt_List.hasAssoc(/* :: */[
10371041
/* tuple */[
@@ -1073,7 +1077,9 @@ eq("REMOVEASSOQ", Belt_List.removeAssoc(/* :: */[
10731077
/* [] */0
10741078
]
10751079
]
1076-
], 3, Caml_obj.caml_equal), /* :: */[
1080+
], 3, (function (prim, prim$1) {
1081+
return prim === prim$1;
1082+
})), /* :: */[
10771083
/* tuple */[
10781084
1,
10791085
"1"
@@ -1105,7 +1111,9 @@ eq("REMOVEASSOQ", Belt_List.removeAssoc(/* :: */[
11051111
/* [] */0
11061112
]
11071113
]
1108-
], 1, Caml_obj.caml_equal), /* :: */[
1114+
], 1, (function (prim, prim$1) {
1115+
return prim === prim$1;
1116+
})), /* :: */[
11091117
/* tuple */[
11101118
2,
11111119
"2"
@@ -1137,7 +1145,9 @@ eq("REMOVEASSOQ", Belt_List.removeAssoc(/* :: */[
11371145
/* [] */0
11381146
]
11391147
]
1140-
], 2, Caml_obj.caml_equal), /* :: */[
1148+
], 2, (function (prim, prim$1) {
1149+
return prim === prim$1;
1150+
})), /* :: */[
11411151
/* tuple */[
11421152
1,
11431153
"1"
@@ -1169,7 +1179,9 @@ eq("REMOVEASSOQ", Belt_List.removeAssoc(/* :: */[
11691179
/* [] */0
11701180
]
11711181
]
1172-
], 0, Caml_obj.caml_equal), /* :: */[
1182+
], 0, (function (prim, prim$1) {
1183+
return prim === prim$1;
1184+
})), /* :: */[
11731185
/* tuple */[
11741186
1,
11751187
"1"
@@ -1311,7 +1323,9 @@ var ll0 = Belt_List.removeAssoc(ll, 0, eqx);
13111323

13121324
b("File \"bs_list_test.ml\", line 196, characters 5-12", ll === ll0);
13131325

1314-
var ll1 = Belt_List.setAssoc(ll, 2, "22", Caml_obj.caml_equal);
1326+
var ll1 = Belt_List.setAssoc(ll, 2, "22", (function (prim, prim$1) {
1327+
return prim === prim$1;
1328+
}));
13151329

13161330
eq("File \"bs_list_test.ml\", line 198, characters 5-12", ll1, /* :: */[
13171331
/* tuple */[
@@ -1333,7 +1347,9 @@ eq("File \"bs_list_test.ml\", line 198, characters 5-12", ll1, /* :: */[
13331347
]
13341348
]);
13351349

1336-
var ll2 = Belt_List.setAssoc(ll1, 22, "2", Caml_obj.caml_equal);
1350+
var ll2 = Belt_List.setAssoc(ll1, 22, "2", (function (prim, prim$1) {
1351+
return prim === prim$1;
1352+
}));
13371353

13381354
b("File \"bs_list_test.ml\", line 200, characters 4-11", Caml_obj.caml_equal(ll2, /* :: */[
13391355
/* tuple */[
@@ -1363,7 +1379,9 @@ b("File \"bs_list_test.ml\", line 202, characters 4-11", Caml_obj.caml_equal(Bel
13631379
/* [] */0
13641380
]
13651381
]
1366-
], 2, "x", Caml_obj.caml_equal), /* :: */[
1382+
], 2, "x", (function (prim, prim$1) {
1383+
return prim === prim$1;
1384+
})), /* :: */[
13671385
/* tuple */[
13681386
1,
13691387
"a"
@@ -1395,7 +1413,9 @@ b("File \"bs_list_test.ml\", line 204, characters 4-11", Caml_obj.caml_equal(Bel
13951413
],
13961414
/* [] */0
13971415
]
1398-
], 2, "2", Caml_obj.caml_equal), /* :: */[
1416+
], 2, "2", (function (prim, prim$1) {
1417+
return prim === prim$1;
1418+
})), /* :: */[
13991419
/* tuple */[
14001420
2,
14011421
"2"
@@ -1415,7 +1435,9 @@ b("File \"bs_list_test.ml\", line 204, characters 4-11", Caml_obj.caml_equal(Bel
14151435
]
14161436
]));
14171437

1418-
eq("File \"bs_list_test.ml\", line 206, characters 5-12", Belt_List.setAssoc(/* [] */0, 1, "1", Caml_obj.caml_equal), /* :: */[
1438+
eq("File \"bs_list_test.ml\", line 206, characters 5-12", Belt_List.setAssoc(/* [] */0, 1, "1", (function (prim, prim$1) {
1439+
return prim === prim$1;
1440+
})), /* :: */[
14191441
/* tuple */[
14201442
1,
14211443
"1"
@@ -1431,7 +1453,9 @@ eq("File \"bs_list_test.ml\", line 208, characters 5-12", Belt_List.setAssoc(/*
14311453
"2"
14321454
],
14331455
/* [] */0
1434-
], 1, "1", Caml_obj.caml_equal), /* :: */[
1456+
], 1, "1", (function (prim, prim$1) {
1457+
return prim === prim$1;
1458+
})), /* :: */[
14351459
/* tuple */[
14361460
1,
14371461
"1"
@@ -1451,7 +1475,9 @@ eq("File \"bs_list_test.ml\", line 210, characters 5-12", Belt_List.setAssoc(/*
14511475
],
14521476
/* [] */0
14531477
]
1454-
], 1, "1", Caml_obj.caml_equal), /* :: */[
1478+
], 1, "1", (function (prim, prim$1) {
1479+
return prim === prim$1;
1480+
})), /* :: */[
14551481
/* tuple */[
14561482
0,
14571483
"0"
@@ -1483,7 +1509,9 @@ b("File \"bs_list_test.ml\", line 211, characters 4-11", Caml_obj.caml_equal(Bel
14831509
/* [] */0
14841510
]
14851511
]
1486-
], 2, Caml_obj.caml_equal), "b"));
1512+
], 2, (function (prim, prim$1) {
1513+
return prim === prim$1;
1514+
})), "b"));
14871515

14881516
b("File \"bs_list_test.ml\", line 212, characters 4-11", Belt_List.getAssoc(/* :: */[
14891517
/* tuple */[
@@ -1503,7 +1531,9 @@ b("File \"bs_list_test.ml\", line 212, characters 4-11", Belt_List.getAssoc(/* :
15031531
/* [] */0
15041532
]
15051533
]
1506-
], 4, Caml_obj.caml_equal) === undefined);
1534+
], 4, (function (prim, prim$1) {
1535+
return prim === prim$1;
1536+
})) === undefined);
15071537

15081538
eq("File \"bs_list_test.ml\", line 216, characters 5-12", /* tuple */[
15091539
Belt_List.head(length_10_id),
@@ -2097,7 +2127,7 @@ b("File \"bs_list_test.ml\", line 310, characters 4-11", Belt_List.cmp(/* :: */[
20972127
]
20982128
]
20992129
]
2100-
], Caml_obj.caml_compare) > 0);
2130+
], Caml_primitive.caml_int_compare) > 0);
21012131

21022132
b("File \"bs_list_test.ml\", line 311, characters 4-11", Belt_List.cmp(/* :: */[
21032133
1,
@@ -2120,7 +2150,7 @@ b("File \"bs_list_test.ml\", line 311, characters 4-11", Belt_List.cmp(/* :: */[
21202150
/* [] */0
21212151
]
21222152
]
2123-
], Caml_obj.caml_compare) > 0);
2153+
], Caml_primitive.caml_int_compare) > 0);
21242154

21252155
b("File \"bs_list_test.ml\", line 312, characters 4-11", Belt_List.cmp(/* :: */[
21262156
1,
@@ -2143,7 +2173,7 @@ b("File \"bs_list_test.ml\", line 312, characters 4-11", Belt_List.cmp(/* :: */[
21432173
]
21442174
]
21452175
]
2146-
], Caml_obj.caml_compare) < 0);
2176+
], Caml_primitive.caml_int_compare) < 0);
21472177

21482178
b("File \"bs_list_test.ml\", line 313, characters 4-11", Belt_List.cmp(/* :: */[
21492179
1,
@@ -2407,7 +2437,9 @@ b("File \"bs_list_test.ml\", line 340, characters 4-11", !Belt_List.eq(/* :: */[
24072437
]
24082438
]
24092439
]
2410-
], Caml_obj.caml_equal));
2440+
], (function (prim, prim$1) {
2441+
return prim === prim$1;
2442+
})));
24112443

24122444
var u0 = Belt_List.makeBy(20, (function (x) {
24132445
return x;

0 commit comments

Comments
 (0)