diff options
| author | Sadiq Jaffer <sadiq@toao.com> | 2021-09-30 15:45:32 +0100 |
|---|---|---|
| committer | Sadiq Jaffer <sadiq@toao.com> | 2021-10-25 13:51:52 +0100 |
| commit | 83c2f09b13905aa70441b504f7bb1da553ae1952 (patch) | |
| tree | 8ac4447253c59d5949b6e7caa6049f475a16f889 /runtime/startup_byt.c | |
| parent | 9fd416c2ca43d63129766671b8f60d55d47d13cf (diff) | |
| download | ocaml-83c2f09b13905aa70441b504f7bb1da553ae1952.tar.gz | |
make codefrag thread-safe by introducing a lock-free skiplist
Diffstat (limited to 'runtime/startup_byt.c')
| -rw-r--r-- | runtime/startup_byt.c | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/runtime/startup_byt.c b/runtime/startup_byt.c index 52af79f1ed..be593a5d6c 100644 --- a/runtime/startup_byt.c +++ b/runtime/startup_byt.c @@ -32,6 +32,7 @@ #include "caml/alloc.h" #include "caml/backtrace.h" #include "caml/callback.h" +#include "caml/codefrag.h" #include "caml/custom.h" #include "caml/debugger.h" #include "caml/domain_state.h" @@ -296,6 +297,8 @@ CAMLexport void caml_main(char_os **argv) if (!caml_startup_aux(/* pooling */ caml_params->cleanup_on_exit)) return; + caml_init_codefrag(); + caml_init_locale(); #if defined(_MSC_VER) && __STDC_SECURE_LIB__ >= 200411L caml_install_invalid_parameter_handler(); @@ -429,6 +432,8 @@ CAMLexport value caml_startup_code_exn( if (!caml_startup_aux(pooling)) return Val_unit; + caml_init_codefrag(); + caml_init_locale(); #if defined(_MSC_VER) && __STDC_SECURE_LIB__ >= 200411L caml_install_invalid_parameter_handler(); |