Runtime: keep caml_string_of_array For_compatibility_only

ocsigen · Jan 16, 2025 · d170d27 · d170d27
1 parent 396982d
commit d170d27
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 0 deletions.
diff --git a/lib/runtime/js_of_ocaml_runtime_stubs.c b/lib/runtime/js_of_ocaml_runtime_stubs.c
@@ -256,6 +256,10 @@ void caml_read_file_content () {
   caml_fatal_error("Unimplemented Javascript primitive caml_read_file_content!");
 }
 
+void caml_string_of_array () {
+  caml_fatal_error("Unimplemented Javascript primitive caml_string_of_array!");
+}
+
 void caml_string_of_jsbytes () {
   caml_fatal_error("Unimplemented Javascript primitive caml_string_of_jsbytes!");
 }

diff --git a/lib/runtime/jsoo_runtime.ml b/lib/runtime/jsoo_runtime.ml
@@ -202,6 +202,8 @@ module For_compatibility_only = struct
   external caml_list_to_js_array : 'a list -> 'a Js.js_array = "caml_list_to_js_array"
 
   external variable : string -> 'a = "caml_js_var"
+
+  external caml_string_of_array : 'a array -> string = "caml_string_of_array"
 end
 
 module Typed_array = struct