Compiler: better name for global js name

ocsigen · Oct 1, 2024 · a37e1bf · a37e1bf
1 parent ef42a56
commit a37e1bf
Show file tree

Hide file tree

Showing 3 changed files with 8 additions and 8 deletions.
diff --git a/compiler/bin-js_of_ocaml/build_fs.ml b/compiler/bin-js_of_ocaml/build_fs.ml
@@ -54,8 +54,8 @@ function jsoo_create_file_extern(name,content){
   if(globalThis.jsoo_create_file)
     globalThis.jsoo_create_file(name,content);
   else {
-    if(!globalThis.caml_fs_tmp) globalThis.caml_fs_tmp = [];
-    globalThis.caml_fs_tmp.push({name:name,content:content});
+    if(!globalThis.jsoo_fs_tmp) globalThis.jsoo_fs_tmp = [];
+    globalThis.jsoo_fs_tmp.push({name:name,content:content});
   }
   return 0;
 }

diff --git a/compiler/tests-full/fs.expected.js b/compiler/tests-full/fs.expected.js
@@ -19,8 +19,8 @@
     if(c.jsoo_create_file)
      c.jsoo_create_file(a, b);
     else{
-     if(! c.caml_fs_tmp) c.caml_fs_tmp = [];
-     c.caml_fs_tmp.push({name: a, content: b});
+     if(! c.jsoo_fs_tmp) c.jsoo_fs_tmp = [];
+     c.jsoo_fs_tmp.push({name: a, content: b});
     }
     return 0;
    }

diff --git a/runtime/fs.js b/runtime/fs.js
@@ -300,23 +300,23 @@ function caml_ba_map_file_bytecode(argv, argn) {
 function jsoo_create_file_extern(name, content) {
   if (globalThis.jsoo_create_file) globalThis.jsoo_create_file(name, content);
   else {
-    if (!globalThis.caml_fs_tmp) globalThis.caml_fs_tmp = [];
-    globalThis.caml_fs_tmp.push({ name: name, content: content });
+    if (!globalThis.jsoo_fs_tmp) globalThis.jsoo_fs_tmp = [];
+    globalThis.jsoo_fs_tmp.push({ name: name, content: content });
   }
   return 0;
 }
 
 //Provides: caml_fs_init
 //Requires: jsoo_create_file
 function caml_fs_init() {
-  var tmp = globalThis.caml_fs_tmp;
+  var tmp = globalThis.jsoo_fs_tmp;
   if (tmp) {
     for (var i = 0; i < tmp.length; i++) {
       jsoo_create_file(tmp[i].name, tmp[i].content);
     }
   }
   globalThis.jsoo_create_file = jsoo_create_file;
-  globalThis.caml_fs_tmp = [];
+  globalThis.jsoo_fs_tmp = [];
   return 0;
 }