wip

Author: cknitt

lib/es6/Intl_NumberFormat_Grouping.js

@@ -1,9 +1,9 @@
 
 
-import * as Type from "./Type.js";
+import * as Stdlib_Type from "./Stdlib_Type.js";
 
 function parseJsValue(value) {
-  let value$1 = Type.Classify.classify(value);
+  let value$1 = Stdlib_Type.Classify.classify(value);
   if (typeof value$1 !== "object") {
     return;
   }

lib/es6/Option.js

@@ -1,6 +1,6 @@
 
 
-import * as $$Error from "./Error.js";
+import * as Stdlib_Error from "./Stdlib_Error.js";
 import * as Primitive_option from "./Primitive_option.js";
 
 function filter(opt, p) {
@@ -21,7 +21,7 @@ function getExn(x, message) {
   if (x !== undefined) {
     return Primitive_option.valFromOption(x);
   } else {
-    return $$Error.panic(message !== undefined ? message : "Option.getExn called for None value");
+    return Stdlib_Error.panic(message !== undefined ? message : "Option.getExn called for None value");
   }
 }
 

lib/es6/Pervasives.js

@@ -1,7 +1,5 @@
 
 
-import * as $$Error from "./Error.js";
-import * as Primitive_object from "./Primitive_object.js";
 import * as Primitive_exceptions from "./Primitive_exceptions.js";
 
 function failwith(s) {
@@ -117,21 +115,6 @@ function $at(l1, l2) {
   }
 }
 
-function assertEqual(a, b) {
-  if (!Primitive_object.notequal(a, b)) {
-    return;
-  }
-  throw {
-    RE_EXN_ID: "Assert_failure",
-    _1: [
-      "Pervasives.res",
-      596,
-      4
-    ],
-    Error: new Error()
-  };
-}
-
 let max_int = 2147483647;
 
 let infinity = Infinity;
@@ -144,8 +127,6 @@ let min_float = 2.22507385850720138e-308;
 
 let epsilon_float = 2.22044604925031308e-16;
 
-let panic = $$Error.panic;
-
 export {
   failwith,
   invalid_arg,
@@ -166,7 +147,5 @@ export {
   bool_of_string_opt,
   int_of_string_opt,
   $at,
-  panic,
-  assertEqual,
 }
 /* No side effect */

lib/es6/Stdlib.js

@@ -1,12 +1,41 @@
 
 
+import * as Stdlib_Error from "./Stdlib_Error.js";
+import * as Primitive_object from "./Primitive_object.js";
+
+function assertEqual(a, b) {
+  if (!Primitive_object.notequal(a, b)) {
+    return;
+  }
+  throw {
+    RE_EXN_ID: "Assert_failure",
+    _1: [
+      "Stdlib.res",
+      292,
+      4
+    ],
+    Error: new Error()
+  };
+}
 
 let $$Array;
 
+let Console;
+
 let $$Date;
 
 let Dict;
 
+let Exn;
+
+let $$Error;
+
+let $$Int8Array;
+
+let $$Int16Array;
+
+let $$Int32Array;
+
 let $$Promise;
 
 let $$RegExp;
@@ -19,15 +48,43 @@ let $$String;
 
 let $$Symbol;
 
+let Type;
+
+let $$TypedArray;
+
+let $$Uint8Array;
+
+let $$Uint8ClampedArray;
+
+let $$Uint16Array;
+
+let $$Uint32Array;
+
+let panic = Stdlib_Error.panic;
+
 export {
   $$Array,
+  Console,
   $$Date,
   Dict,
+  Exn,
+  $$Error,
+  $$Int8Array,
+  $$Int16Array,
+  $$Int32Array,
   $$Promise,
   $$RegExp,
   Result,
   $$Set,
   $$String,
   $$Symbol,
+  Type,
+  $$TypedArray,
+  $$Uint8Array,
+  $$Uint8ClampedArray,
+  $$Uint16Array,
+  $$Uint32Array,
+  panic,
+  assertEqual,
 }
 /* No side effect */