diff options
Diffstat (limited to 'runtime/fix_code.c')
| -rw-r--r-- | runtime/fix_code.c | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/runtime/fix_code.c b/runtime/fix_code.c index aa059be5df..5584019867 100644 --- a/runtime/fix_code.c +++ b/runtime/fix_code.c @@ -82,8 +82,14 @@ void caml_fixup_endianness(code_t code, asize_t len) #ifdef THREADED_CODE -char ** caml_instr_table; -char * caml_instr_base; +static char ** caml_instr_table; +static char * caml_instr_base; + +void caml_init_thread_code(void ** instr_table, void * instr_base) +{ + caml_instr_table = (char **) instr_table; + caml_instr_base = (char *) instr_base; +} static int* opcode_nargs = NULL; int* caml_init_opcode_nargs(void) |