X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perlvars.h;h=b841719dc2fb3e575e456552a0804a388f216587;hb=439ba5457a8422144686c1df300aa1dde218dbfd;hp=adcc2c097b8e8c69d3a86b214d8e68b4b4f75915;hpb=d6376244c2261025775e8b11a6a64d7c9e0d1612;p=p5sagit%2Fp5-mst-13.2.git diff --git a/perlvars.h b/perlvars.h index adcc2c0..b841719 100644 --- a/perlvars.h +++ b/perlvars.h @@ -46,11 +46,15 @@ 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)) +PERLVARI(Gthreadhook, thrhook_proc_t, MEMBER_TO_FPTR(Perl_nothreadhook)) +