this repo has no description
at main 59 lines 1.3 kB view raw
1//Provides: caml_unix_times 2function caml_unix_times() { 3 return 4.2 4} 5 6//Provides: ml_merlin_fs_exact_case_basename 7function ml_merlin_fs_exact_case_basename(str) { 8 return 0 9} 10 11//Provides: ml_merlin_fs_exact_case 12function ml_merlin_fs_exact_case(str) { 13 return str 14} 15 16//Provides: stub_sha512_init 17function stub_sha512_init() { 18 return 0 19} 20 21//Provides: caml_thread_initialize 22function caml_thread_initialize() { 23 return 0 24} 25 26//Provides: caml_sys_const_arch_amd64 const 27function caml_sys_const_arch_amd64() { 28 return 1 29} 30 31//Provides: caml_sys_const_arch_arm64 const 32function caml_sys_const_arch_arm64() { 33 return 0 34} 35 36// OxCaml compiler-libs references caml_make_local_vect but base (which provides 37// it) is not a transitive dependency, so we need our own stub. 38//Provides: caml_make_local_vect 39//Requires: caml_make_vect 40function caml_make_local_vect(len, init) { 41 return caml_make_vect(len, init); 42} 43 44// OxCaml domain TLS - single-domain JS environment, just use a shared object 45//Provides: jtw_tls_state 46var jtw_tls_state = { value: 0 }; 47 48//Provides: caml_domain_tls_get 49//Requires: jtw_tls_state 50function caml_domain_tls_get() { 51 return jtw_tls_state.value; 52} 53 54//Provides: caml_domain_tls_set 55//Requires: jtw_tls_state 56function caml_domain_tls_set(v) { 57 jtw_tls_state.value = v; 58 return 0; 59}