X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perlvars.h;h=69206a5d7a37fbad5bd240c512c0cf955555b1e7;hb=43051805d53a3e4c5b2185a17655cab5bedc17ed;hp=8a72312e574a7dc57bb9ab9d14deaeb02cbcfaf0;hpb=3fe6f2dcb97acb1a1bb0a27dc5753fbc0548c545;p=p5sagit%2Fp5-mst-13.2.git diff --git a/perlvars.h b/perlvars.h index 8a72312..69206a5 100644 --- a/perlvars.h +++ b/perlvars.h @@ -19,6 +19,7 @@ PERLVAR(Geval_owner, struct perl_thread *) /* Owner thread for doeval */ PERLVAR(Gnthreads, int) /* Number of threads currently */ PERLVAR(Gthreads_mutex, perl_mutex) /* Mutex for nthreads and thread list */ PERLVAR(Gnthreads_cond, perl_cond) /* Condition variable for nthreads */ +PERLVAR(Gsvref_mutex, perl_mutex) /* Mutex for SvREFCNT_{inc,dec} */ PERLVARI(Gthreadsv_names, char *, THREADSV_NAMES) #ifdef FAKE_THREADS PERLVAR(Gcurthr, struct perl_thread *) /* Currently executing (fake) thread */