add wrap_op_checker() API function

This function provides a convenient and thread-safe way for modules to
hook op checking.

1 files changed, 1 insertions, 0 deletions

diff --git a/perl.c b/perl.c
index e8a9c23e2d..f754ac2112 100644
--- a/perl.c
+++ b/perl.c
@@ -105,6 +105,7 @@ S_init_tls_and_interp(PerlInterpreter *my_perl)
 	ALLOC_THREAD_KEY;
 	PERL_SET_THX(my_perl);
 	OP_REFCNT_INIT;
+	OP_CHECK_MUTEX_INIT;
 	HINTS_REFCNT_INIT;
 	MUTEX_INIT(&PL_dollarzero_mutex);
 	MUTEX_INIT(&PL_my_ctx_mutex);