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 */
#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[{]}")