From 2958322a26062e7299a1f41f3e43f62f7a457249 Mon Sep 17 00:00:00 2001
From: Hugo Heuzard <hugo.heuzard@gmail.com>
Date: Thu, 28 Sep 2023 11:07:37 +0200
Subject: [PATCH] fixup! Dynlink: prepare for ocaml 5.2

---
 runtime/toplevel.js | 1 +
 1 file changed, 1 insertion(+)

diff --git a/runtime/toplevel.js b/runtime/toplevel.js
index f6d2fab90f..4f9feb1515 100644
--- a/runtime/toplevel.js
+++ b/runtime/toplevel.js
@@ -76,6 +76,7 @@ function caml_reify_bytecode (code, debug,_digest) {
     code = new Uint8Array(len);
     for(var i = 0, len = 0; i < all.length; i++){
       code.set(all[i], len);
+      len += all[i].length;
     }
     code = caml_string_of_array(code);
     return [0, 0, caml_callback(globalThis.toplevelCompile, [code,debug])];