XXX temp to test broken lconv on non-Windows

Perl · Nov 13, 2023 · a788f2e · a788f2e
1 parent 0c12a43
commit a788f2e
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/perl.h b/perl.h
@@ -45,6 +45,12 @@
 
 #include "config.h"
 
+#ifndef WIN32   /* XXX temp */
+#  define _configthreadlocale(x) (! cBOOL(x))
+#  define _DISABLE_PER_THREAD_LOCALE 0
+#  define _ENABLE_PER_THREAD_LOCALE 1
+#endif
+
 /* This fakes up using Mingw for locale handling.  In order to not define WIN32
  * in this file (and hence throughout the code that isn't expecting it), this
  * doesn't define that, but defines the appropriate things that would otherwise