X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perlvars.h;h=51956795d8be82f440263c3b0f76d58cd8637676;hb=126f3c5f1f20a40de59db499161effaa9e24e4fc;hp=adcc2c097b8e8c69d3a86b214d8e68b4b4f75915;hpb=d6376244c2261025775e8b11a6a64d7c9e0d1612;p=p5sagit%2Fp5-mst-13.2.git diff --git a/perlvars.h b/perlvars.h index adcc2c0..5195679 100644 --- a/perlvars.h +++ b/perlvars.h @@ -46,11 +46,14 @@ PERLVAR(Gmalloc_mutex, perl_mutex) /* Mutex for malloc */ #if defined(USE_ITHREADS) PERLVAR(Gop_mutex, perl_mutex) /* Mutex for op refcounting */ -PERLVAR(Gsharedsv_space, PerlInterpreter*) /* The shared sv space */ -PERLVAR(Gsharedsv_space_mutex, perl_mutex) /* Mutex protecting the shared sv space */ #endif /* Force inclusion of both runops options */ PERLVARI(Grunops_std, runops_proc_t, MEMBER_TO_FPTR(Perl_runops_standard)) PERLVARI(Grunops_dbg, runops_proc_t, MEMBER_TO_FPTR(Perl_runops_debug)) +/* Hooks to shared SVs and locks. */ +PERLVARI(Gsharehook, share_proc_t, MEMBER_TO_FPTR(Perl_sv_nosharing)) +PERLVARI(Glockhook, share_proc_t, MEMBER_TO_FPTR(Perl_sv_nolocking)) +PERLVARI(Gunlockhook, share_proc_t, MEMBER_TO_FPTR(Perl_sv_nounlocking)) +