rename to "of1" similar to Javascript name

Author: jmagaram

src/Core__Array.res

@@ -246,4 +246,4 @@ let findMap = (arr, f) => {
 
 @send external at: (array<'a>, int) => option<'a> = "at"
 
-@val external fromSingleton: 'a => array<'a> = "Array.of"
+@val external of1: 'a => array<'a> = "Array.of"

src/Core__Array.resi

@@ -971,15 +971,16 @@ let findMap: (array<'a>, 'a => option<'b>) => option<'b>
 external at: (array<'a>, int) => option<'a> = "at"
 
 /**
-`fromSingleton` generates a new array from a single value.
+`of1` generates a new array from a single value. See [Array.of on MDN](https://developer.mozilla.org/en-US/docs/Web/JavaScript/Reference/Global_Objects/Array/of)
 
 ## Examples
 
 ```rescript
-3->Array.fromSingleton // [3]
-undefined->Array.fromSingleton // [undefined]
-Some("abc")->Array.fromSingleton // [Some("abc")]
-{"x": 3, "y": 5}->Array.fromSingleton // Some({"x": 3, "y": 5})
+3->Array.of1 // [3]
+undefined->Array.of1 // [undefined]
+Some("abc")->Array.of1 // [Some("abc")]
+[1,2,3]->Array.of1 // [[1,2,3]]
+{"x": 3, "y": 5}->Array.of1 // Some({"x": 3, "y": 5})
 ```
 
 ## Specifications
@@ -988,4 +989,4 @@ Some("abc")->Array.fromSingleton // [Some("abc")]
 - [Array.of ECMAScript Language Specification](https://tc39.es/ecma262/multipage/indexed-collections.html#sec-array.of)
 */
 @val
-external fromSingleton: 'a => array<'a> = "Array.of"
+external of1: 'a => array<'a> = "Array.of"

test/ArrayTests.mjs

@@ -401,33 +401,33 @@ Test.run([
 
           })), eq, undefined);
 
-function singletonTest(a, title) {
+function of1Test(a, title) {
   Test.run([
         [
           "ArrayTests.res",
           103,
           22,
-          48
+          38
         ],
-        "fromSingleton : " + title + ""
+        "of1 : " + title + ""
       ], Array.of(a), Caml_obj.equal, [a]);
   Test.run([
         [
           "ArrayTests.res",
           104,
           22,
-          48
+          38
         ],
-        "fromSingleton : " + title + ""
+        "of1 : " + title + ""
       ], Array.of(a).length, eq, 1);
   Test.run([
         [
           "ArrayTests.res",
-          106,
-          15,
-          41
+          105,
+          22,
+          38
         ],
-        "fromSingleton : " + title + ""
+        "of1 : " + title + ""
       ], Array.of(a)[0], (function (i, j) {
           return i === j;
         }), a);
@@ -438,29 +438,29 @@ var m = Array.of({
       y: 5
     });
 
-singletonTest(3, "Single integer");
+of1Test(3, "Single integer");
 
-singletonTest("abc", "Single string");
+of1Test("abc", "Single string");
 
-singletonTest(undefined, "undefined");
+of1Test(undefined, "undefined");
 
-singletonTest(null, "null");
+of1Test(null, "null");
 
-singletonTest([
+of1Test([
       1,
       2,
       3
     ], "full array of integers");
 
-singletonTest([], "empty array");
+of1Test([], "empty array");
 
-singletonTest(5, "Some");
+of1Test(5, "Some");
 
-singletonTest(undefined, "None");
+of1Test(undefined, "None");
 
 export {
   eq ,
-  singletonTest ,
+  of1Test ,
   m ,
 }
 /*  Not a pure module */

test/ArrayTests.res

@@ -99,22 +99,17 @@ Test.run(
   None,
 )
 
-let singletonTest = (a, title) => {
-  Test.run(__POS_OF__(`fromSingleton : ${title}`), Array.fromSingleton(a), (i, j) => i == j, [a])
-  Test.run(__POS_OF__(`fromSingleton : ${title}`), Array.fromSingleton(a)->Array.length, eq, 1)
-  Test.run(
-    __POS_OF__(`fromSingleton : ${title}`),
-    Array.fromSingleton(a)->Array.getUnsafe(0),
-    (i, j) => i === j,
-    a,
-  )
+let of1Test = (a, title) => {
+  Test.run(__POS_OF__(`of1 : ${title}`), Array.of1(a), (i, j) => i == j, [a])
+  Test.run(__POS_OF__(`of1 : ${title}`), Array.of1(a)->Array.length, eq, 1)
+  Test.run(__POS_OF__(`of1 : ${title}`), Array.of1(a)->Array.getUnsafe(0), (i, j) => i === j, a)
 }
-let m = {"x": 3, "y": 5}->Array.fromSingleton
-3->singletonTest("Single integer")
-"abc"->singletonTest("Single string")
-undefined->singletonTest("undefined")
-null->singletonTest("null")
-[1, 2, 3]->singletonTest("full array of integers")
-[]->singletonTest("empty array")
-Some(5)->singletonTest("Some")
-None->singletonTest("None")
+let m = {"x": 3, "y": 5}->Array.of1
+3->of1Test("Single integer")
+"abc"->of1Test("Single string")
+undefined->of1Test("undefined")
+null->of1Test("null")
+[1, 2, 3]->of1Test("full array of integers")
+[]->of1Test("empty array")
+Some(5)->of1Test("Some")
+None->of1Test("None")

test/TestSuite.mjs

@@ -28,7 +28,7 @@ var Concurrently = PromiseTest.Concurrently;
 
 var panicTest = ErrorTests.panicTest;
 
-var singletonTest = ArrayTests.singletonTest;
+var of1Test = ArrayTests.of1Test;
 
 var m = ArrayTests.m;
 
@@ -65,7 +65,7 @@ export {
   Catching ,
   Concurrently ,
   panicTest ,
-  singletonTest ,
+  of1Test ,
   m ,
   $$catch ,
   forEachIfOkCallFunction ,