diff options
author | KC Sivaramakrishnan <kc@kcsrk.info> | 2019-06-07 16:19:28 +0530 |
---|---|---|
committer | KC Sivaramakrishnan <kc@kcsrk.info> | 2019-08-23 09:50:05 +0530 |
commit | 111f6af469f9da2c123a830790a7834728621657 (patch) | |
tree | e7f2c6b43e515d7b86c2647c5bd847755fb2e803 /runtime/fail_byt.c | |
parent | c06038a0eef0eb7f8fda789fb201fefa4df28180 (diff) | |
download | ocaml-111f6af469f9da2c123a830790a7834728621657.tar.gz |
Move bytecode global variables to domain state
Diffstat (limited to 'runtime/fail_byt.c')
-rw-r--r-- | runtime/fail_byt.c | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/runtime/fail_byt.c b/runtime/fail_byt.c index 9c8d6a45f9..27ad42f625 100644 --- a/runtime/fail_byt.c +++ b/runtime/fail_byt.c @@ -30,15 +30,12 @@ #include "caml/signals.h" #include "caml/stacks.h" -CAMLexport struct longjmp_buffer * caml_external_raise = NULL; -value caml_exn_bucket; - CAMLexport void caml_raise(value v) { Unlock_exn(); - caml_exn_bucket = v; - if (caml_external_raise == NULL) caml_fatal_uncaught_exception(v); - siglongjmp(caml_external_raise->buf, 1); + Caml_state->exn_bucket = v; + if (Caml_state->external_raise == NULL) caml_fatal_uncaught_exception(v); + siglongjmp(Caml_state->external_raise->buf, 1); } CAMLexport void caml_raise_constant(value tag) |