Add a few Stdlib helpers (#7516)

* Add String.isEmpty and String.capitalize

* Fix String.isEmpty doc string

* Add Dict.size

* Add `isEmpty` function to Array, Dict, Map, Set with corresponding documentation

* Make Stdlib.Dict more performant

* Use more optimised implimintation for Dict.size & Dict.isEmpty

* Update changelog

* Fix tests

Author: DZakh

CHANGELOG.md

@@ -18,6 +18,8 @@
 
 #### :rocket: New Feature
 
+- Add new Stdlib helpers: `String.capitalize`, `String.isEmpty`, `Dict.size`, `Dict.isEmpty`, `Array.isEmpty`, `Map.isEmpty`, `Set.isEmpty`. https://github.com/rescript-lang/rescript/pull/7516
+
 #### :bug: Bug fix
 
 #### :memo: Documentation

lib/es6/Stdlib_Array.js

@@ -22,6 +22,10 @@ function fromInitializer(length, f) {
   return arr;
 }
 
+function isEmpty(arr) {
+  return arr.length === 0;
+}
+
 function equal(a, b, eq) {
   let len = a.length;
   if (len === b.length) {
@@ -183,6 +187,7 @@ export {
   fromInitializer,
   equal,
   compare,
+  isEmpty,
   indexOfOpt,
   lastIndexOfOpt,
   reduce,

lib/es6/Stdlib_Dict.js

@@ -5,25 +5,45 @@ function $$delete$1(dict, string) {
   delete(dict[string]);
 }
 
-function forEach(dict, f) {
-  Object.values(dict).forEach(value => f(value));
-}
+let forEach = ((dict, f) => {
+  for (var i in dict) {
+    f(dict[i]);
+  }
+});
 
-function forEachWithKey(dict, f) {
-  Object.keys(dict).forEach(key => f(dict[key], key));
-}
+let forEachWithKey = ((dict, f) => {
+  for (var i in dict) {
+    f(dict[i], i);
+  }
+});
 
-function mapValues(dict, f) {
-  let target = {};
-  Object.keys(dict).forEach(key => {
-    let value = dict[key];
-    target[key] = f(value);
-  });
+let mapValues = ((dict, f) => {
+  var target = {}, i;
+  for (i in dict) {
+    target[i] = f(dict[i]);
+  }
   return target;
-}
+});
+
+let size = ((dict) => {
+  var size = 0, i;
+  for (i in dict) {
+    size++;
+  }
+  return size;
+});
+
+let isEmpty = ((dict) => {
+  for (var _ in dict) {
+    return false
+  }
+  return true
+});
 
 export {
   $$delete$1 as $$delete,
+  size,
+  isEmpty,
   forEach,
   forEachWithKey,
   mapValues,

lib/es6/Stdlib_Map.js

@@ -1 +1,11 @@
-/* This output is empty. Its source's type definitions, externals and/or unused code got optimized away. */
+
+
+
+function isEmpty(map) {
+  return map.size === 0;
+}
+
+export {
+  isEmpty,
+}
+/* No side effect */

lib/es6/Stdlib_Set.js

@@ -1 +1,11 @@
-/* This output is empty. Its source's type definitions, externals and/or unused code got optimized away. */
+
+
+
+function isEmpty(set) {
+  return set.size === 0;
+}
+
+export {
+  isEmpty,
+}
+/* No side effect */

lib/es6/Stdlib_String.js

@@ -25,9 +25,23 @@ function searchOpt(s, re) {
 
 }
 
+function isEmpty(s) {
+  return s.length === 0;
+}
+
+function capitalize(s) {
+  if (s.length === 0) {
+    return s;
+  } else {
+    return s[0].toUpperCase() + s.slice(1);
+  }
+}
+
 export {
   indexOfOpt,
   lastIndexOfOpt,
   searchOpt,
+  isEmpty,
+  capitalize,
 }
 /* No side effect */

lib/js/Stdlib_Array.js

@@ -22,6 +22,10 @@ function fromInitializer(length, f) {
   return arr;
 }
 
+function isEmpty(arr) {
+  return arr.length === 0;
+}
+
 function equal(a, b, eq) {
   let len = a.length;
   if (len === b.length) {
@@ -182,6 +186,7 @@ exports.make = make;
 exports.fromInitializer = fromInitializer;
 exports.equal = equal;
 exports.compare = compare;
+exports.isEmpty = isEmpty;
 exports.indexOfOpt = indexOfOpt;
 exports.lastIndexOfOpt = lastIndexOfOpt;
 exports.reduce = reduce;

lib/js/Stdlib_Dict.js

@@ -5,24 +5,44 @@ function $$delete$1(dict, string) {
   delete(dict[string]);
 }
 
-function forEach(dict, f) {
-  Object.values(dict).forEach(value => f(value));
-}
+let forEach = ((dict, f) => {
+  for (var i in dict) {
+    f(dict[i]);
+  }
+});
 
-function forEachWithKey(dict, f) {
-  Object.keys(dict).forEach(key => f(dict[key], key));
-}
+let forEachWithKey = ((dict, f) => {
+  for (var i in dict) {
+    f(dict[i], i);
+  }
+});
 
-function mapValues(dict, f) {
-  let target = {};
-  Object.keys(dict).forEach(key => {
-    let value = dict[key];
-    target[key] = f(value);
-  });
+let mapValues = ((dict, f) => {
+  var target = {}, i;
+  for (i in dict) {
+    target[i] = f(dict[i]);
+  }
   return target;
-}
+});
+
+let size = ((dict) => {
+  var size = 0, i;
+  for (i in dict) {
+    size++;
+  }
+  return size;
+});
+
+let isEmpty = ((dict) => {
+  for (var _ in dict) {
+    return false
+  }
+  return true
+});
 
 exports.$$delete = $$delete$1;
+exports.size = size;
+exports.isEmpty = isEmpty;
 exports.forEach = forEach;
 exports.forEachWithKey = forEachWithKey;
 exports.mapValues = mapValues;

lib/js/Stdlib_Map.js

@@ -1 +1,9 @@
-/* This output is empty. Its source's type definitions, externals and/or unused code got optimized away. */
+'use strict';
+
+
+function isEmpty(map) {
+  return map.size === 0;
+}
+
+exports.isEmpty = isEmpty;
+/* No side effect */

lib/js/Stdlib_Set.js

@@ -1 +1,9 @@
-/* This output is empty. Its source's type definitions, externals and/or unused code got optimized away. */
+'use strict';
+
+
+function isEmpty(set) {
+  return set.size === 0;
+}
+
+exports.isEmpty = isEmpty;
+/* No side effect */