diff --git a/src/include/Rdyntrace.h b/src/include/Rdyntrace.h index adff4a61..065774d9 100644 --- a/src/include/Rdyntrace.h +++ b/src/include/Rdyntrace.h @@ -828,6 +828,7 @@ int dyntrace_get_c_function_argument_evaluation(SEXP op); int dyntrace_get_c_function_arity(SEXP op); int dyntrace_get_primitive_offset(SEXP op); const char *const dyntrace_get_c_function_name(SEXP op); +SEXP* dyntrace_get_symbol_table(); void(SET_PRENV_UNPROBED)(SEXP x, SEXP v); void(SET_PRVALUE_UNPROBED)(SEXP x, SEXP v); diff --git a/src/main/dyntrace.c b/src/main/dyntrace.c index b6ce3c8b..c193a839 100644 --- a/src/main/dyntrace.c +++ b/src/main/dyntrace.c @@ -249,3 +249,7 @@ const char* const dyntrace_get_c_function_name(SEXP op) { int offset = dyntrace_get_primitive_offset(op); return R_FunTab[offset].name; } + +SEXP* dyntrace_get_symbol_table() { + return R_SymbolTable; +}