This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
perlvars.h: Fix comment
authorKarl Williamson <khw@cpan.org>
Mon, 30 Nov 2020 16:39:34 +0000 (09:39 -0700)
committerKarl Williamson <khw@cpan.org>
Fri, 4 Dec 2020 21:43:12 +0000 (14:43 -0700)
perlvars.h

index 760cb5c..b7ee1c6 100644 (file)
@@ -106,7 +106,7 @@ PERLVARI(G, mmap_page_size, IV, 0)
 PERLVAR(G, hints_mutex, perl_mutex)    /* Mutex for refcounted he refcounting */
 PERLVAR(G, env_mutex, perl_mutex)      /* Mutex for accessing ENV */
 #  if ! defined(USE_THREAD_SAFE_LOCALE) || defined(TS_W32_BROKEN_LOCALECONV)
-PERLVAR(G, locale_mutex, perl_mutex)   /* Mutex for setlocale() changing */
+PERLVAR(G, locale_mutex, perl_mutex)   /* Mutex related to locale handling */
 #  endif
 #  ifndef USE_THREAD_SAFE_LOCALE
 PERLVAR(G, lc_numeric_mutex, perl_mutex)   /* Mutex for switching LC_NUMERIC */