Simplify caml_str_repeat

Author: hhugo

runtime/js/ieee_754.js

@@ -434,7 +434,7 @@ function caml_fma_float(x, y, z) {
 }
 
 //Provides: caml_format_float const
-//Requires: caml_parse_format, caml_finish_formatting
+//Requires: caml_str_repeat, caml_parse_format, caml_finish_formatting
 function caml_format_float(fmt, x) {
   function toFixed(x, dp) {
     if (Math.abs(x) < 1.0) {
@@ -444,9 +444,9 @@ function caml_format_float(fmt, x) {
       if (e > 20) {
         e -= 20;
         x /= Math.pow(10, e);
-        x += new Array(e + 1).join("0");
+        x += caml_str_repeat(e,"0");
         if (dp > 0) {
-          x = x + "." + new Array(dp + 1).join("0");
+          x = x + "." + caml_str_repeat(dp,"0");
         }
         return x;
       } else return x.toFixed(dp);

runtime/js/mlBytes.js

@@ -47,26 +47,7 @@
 //   kind(x) =           x&6
 
 //Provides: caml_str_repeat
-function caml_str_repeat(n, s) {
-  if (n === 0) return "";
-  if (s.repeat) {
-    return s.repeat(n);
-  } // ECMAscript 6 and Firefox 24+
-  var r = "",
-    l = 0;
-  for (;;) {
-    if (n & 1) r += s;
-    n >>= 1;
-    if (n === 0) return r;
-    s += s;
-    l++;
-    if (l === 9) {
-      s.slice(0, 1); // flatten the string
-      // then, the flattening of the whole string will be faster,
-      // as it will be composed of larger pieces
-    }
-  }
-}
+function caml_str_repeat(n, s) { return s.repeat(n); }
 
 //Provides: caml_subarray_to_jsbytes
 //Weakdef