ucrt

Perl · Sep 13, 2023 · 372e4c1 · 372e4c1
1 parent 7d7713e
commit 372e4c1
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/perl.h b/perl.h
@@ -1245,9 +1245,11 @@ typedef enum {
 
    /* On threaded builds, use thread-safe locales if they are available and not
     * forbidden.  Availability is when we are using POSIX 2008 locales, or
-    * Windows for any vintage recent enough to have _MSC_VER defined */
+    * Windows for any vintage recent enough to have _MSC_VER defined, or are
+    * using UCRT (principally MINGW in this latter case) */
 #  if defined(USE_LOCALE_THREADS) && ! defined(NO_THREAD_SAFE_LOCALE)
-#    if defined(USE_POSIX_2008_LOCALE) || (defined(WIN32) && defined(_MSC_VER))
+#    if  defined(USE_POSIX_2008_LOCALE)                                     \
+     || (defined(WIN32) && (defined(_MSC_VER) || (defined(_UCRT))))
 #      define USE_THREAD_SAFE_LOCALE
 #    endif
 #  endif