XXX temp to try to get MingW to work

Perl · Nov 20, 2023 · a4ee16d · a4ee16d
1 parent 89e2284
commit a4ee16d
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/makedef.pl b/makedef.pl
@@ -175,8 +175,8 @@ BEGIN
 
 if ($define{USE_LOCALE_THREADS} && ! $define{NO_THREAD_SAFE_LOCALE}) {
     if (    $define{USE_POSIX_2008_LOCALE}
-        || ($define{WIN32} && (   $cctype !~ /\D/
-                               && $cctype >= 80)))
+        || ($define{WIN32} && ($cctype eq "GCC" || (   $cctype !~ /\D/
+                                                    && $cctype >= 80))))
     {
         $define{USE_THREAD_SAFE_LOCALE} = 1;
     }