From 5e8d9b2e2d86fa574f7a71d55d9ba7b120778a0d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?J=C3=A9r=C3=B4me=20Vouillon?= <jerome.vouillon@gmail.com>
Date: Wed, 18 Dec 2024 21:54:24 +0100
Subject: [PATCH] Flag use-js-string default to false for wasm_of_ocaml

---
 compiler/lib/config.ml | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/compiler/lib/config.ml b/compiler/lib/config.ml
index 29f39a1f02..ec6fb742ac 100644
--- a/compiler/lib/config.ml
+++ b/compiler/lib/config.ml
@@ -193,5 +193,7 @@ let target () =
 let set_target (t : [ `JavaScript | `Wasm ]) =
   (match t with
   | `JavaScript -> Targetint.set_num_bits 32
-  | `Wasm -> Targetint.set_num_bits 31);
+  | `Wasm ->
+      Targetint.set_num_bits 31;
+      Flag.disable "use-js-string");
   target_ := (t :> [ `JavaScript | `Wasm | `None ])