CR

ocsigen · Sep 23, 2024 · e20a87c · e20a87c
1 parent 0998c20
commit e20a87c
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/compiler/lib/specialize_js.ml b/compiler/lib/specialize_js.ml
@@ -44,8 +44,7 @@ let specialize_instr ~target info i =
         , Prim
             ( Extern (("caml_js_var" | "caml_js_expr" | "caml_pure_js_expr") as prim)
             , [ (Pv _ as y) ] ) )
-    , target )
-    when Poly.equal target `Wasm || Config.Flag.safe_string () -> (
+    , target ) -> (
       match the_string_of ~target info y with
       | Some s -> Let (x, Prim (Extern prim, [ Pc (String s) ]))
       | _ -> i)