X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perlvars.h;h=69206a5d7a37fbad5bd240c512c0cf955555b1e7;hb=43051805d53a3e4c5b2185a17655cab5bedc17ed;hp=b58ea1672809de9f671576c5b0062fb21241f6e1;hpb=3fe35a814d0a98f430bf0a538c953f3564df33ca;p=p5sagit%2Fp5-mst-13.2.git diff --git a/perlvars.h b/perlvars.h index b58ea16..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 */ @@ -158,8 +159,8 @@ PERLVARI(Gnumeric_local, bool, TRUE) /* Assume local numerics */ #endif /* !USE_LOCALE_NUMERIC */ /* constants (these are not literals to facilitate pointer comparisons) */ -PERLVARIC(GYes, char *, "1"); -PERLVARIC(GNo, char *, ""); -PERLVARIC(Ghexdigit, char *, "0123456789abcdef0123456789ABCDEFx"); -PERLVARIC(Gpatleave, char *, "\\.^$@dDwWsSbB+*?|()-nrtfeaxc0123456789[{]}"); +PERLVARIC(GYes, char *, "1") +PERLVARIC(GNo, char *, "") +PERLVARIC(Ghexdigit, char *, "0123456789abcdef0123456789ABCDEFx") +PERLVARIC(Gpatleave, char *, "\\.^$@dDwWsSbB+*?|()-nrtfeaxc0123456789[{]}")