From a490036e256564e14dd63c89a0940afa6ca501c0 Mon Sep 17 00:00:00 2001
From: Hugo Heuzard <hugo.heuzard@gmail.com>
Date: Fri, 11 Oct 2024 10:14:11 +0200
Subject: [PATCH] WIP

---
 CHANGES.md                                  | 1 +
 compiler/tests-check-prim/main.output       | 1 -
 compiler/tests-check-prim/main.output5      | 1 -
 compiler/tests-check-prim/unix-unix.output  | 1 -
 compiler/tests-check-prim/unix-unix.output5 | 1 -
 runtime/mlBytes.js                          | 1 +
 6 files changed, 2 insertions(+), 4 deletions(-)

diff --git a/CHANGES.md b/CHANGES.md
index 87ab15d50e..735b3d5291 100644
--- a/CHANGES.md
+++ b/CHANGES.md
@@ -23,6 +23,7 @@
   requested at compile time (--enable with-js-error) or at startup (OCAMLRUNPARAM=b=1)
 * Runtime: allow dynlink of precompiled js with separate compilation (#1676)
 * Runtime: reimplement the runtime of weak and ephemeron (#1707)
+* Runtime: refactor mlBytes
 * Lib: Modify Typed_array API for compatibility with WebAssembly
 * Toplevel: no longer set globals for toplevel initialization
 
diff --git a/compiler/tests-check-prim/main.output b/compiler/tests-check-prim/main.output
index 231207fff5..b5d4c4d6b8 100644
--- a/compiler/tests-check-prim/main.output
+++ b/compiler/tests-check-prim/main.output
@@ -8,7 +8,6 @@ caml_dynlink_close_lib
 caml_dynlink_get_current_libs
 caml_dynlink_lookup_symbol
 caml_dynlink_open_lib
-caml_fill_string
 caml_int64_add_native
 caml_int64_and_native
 caml_int64_div_native
diff --git a/compiler/tests-check-prim/main.output5 b/compiler/tests-check-prim/main.output5
index 155a9481a4..470dc712b8 100644
--- a/compiler/tests-check-prim/main.output5
+++ b/compiler/tests-check-prim/main.output5
@@ -10,7 +10,6 @@ caml_dynlink_close_lib
 caml_dynlink_get_current_libs
 caml_dynlink_lookup_symbol
 caml_dynlink_open_lib
-caml_fill_string
 caml_int_as_pointer
 caml_reset_afl_instrumentation
 caml_signbit
diff --git a/compiler/tests-check-prim/unix-unix.output b/compiler/tests-check-prim/unix-unix.output
index c90c6a145a..3d6399954e 100644
--- a/compiler/tests-check-prim/unix-unix.output
+++ b/compiler/tests-check-prim/unix-unix.output
@@ -8,7 +8,6 @@ caml_dynlink_close_lib
 caml_dynlink_get_current_libs
 caml_dynlink_lookup_symbol
 caml_dynlink_open_lib
-caml_fill_string
 caml_int64_add_native
 caml_int64_and_native
 caml_int64_div_native
diff --git a/compiler/tests-check-prim/unix-unix.output5 b/compiler/tests-check-prim/unix-unix.output5
index b5e4df0497..3ac8083bb9 100644
--- a/compiler/tests-check-prim/unix-unix.output5
+++ b/compiler/tests-check-prim/unix-unix.output5
@@ -10,7 +10,6 @@ caml_dynlink_close_lib
 caml_dynlink_get_current_libs
 caml_dynlink_lookup_symbol
 caml_dynlink_open_lib
-caml_fill_string
 caml_int_as_pointer
 caml_reset_afl_instrumentation
 caml_signbit
diff --git a/runtime/mlBytes.js b/runtime/mlBytes.js
index 73a9d63ecd..2e10c0367e 100644
--- a/runtime/mlBytes.js
+++ b/runtime/mlBytes.js
@@ -572,6 +572,7 @@ function caml_bytes_greaterthan(s1, s2) {
 }
 
 //Provides: caml_fill_bytes
+//Alias: caml_fill_string
 function caml_fill_bytes(s, i, l, c) {
   if (l > 0) {
     for (l += i; i < l; i++) s.a[i] = c;