diff options
author | Karl Williamson <khw@cpan.org> | 2018-03-18 12:39:47 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2018-03-19 12:18:15 -0600 |
commit | 5a53bf3882284a78c3cb93c541fb981f5e9bf4b8 (patch) | |
tree | 7e718425ec5121c168c48706635bea3cb7be717c /perl.h | |
parent | 9ff99fb340d32553ec2fa54534557cb168f284d1 (diff) | |
download | perl-5a53bf3882284a78c3cb93c541fb981f5e9bf4b8.tar.gz |
Fix locale problems on mingw
Various symbols get exported (or not) by makedef.pl. The determination
of some of the new ones is fairly complex in perl.h, and unfortunately
in general the code logic to do so must be copied into makedef.pl (until
a volunteer fixes this). I thought I could avoid a bunch of this by
using the symbol ${^SAFE_LOCALES} which in fact was created so that
programs wouldn't have to know about this complexity.
The problem is that on Windows, miniperl is always compiled
single-thread and so locales are always safe, and so makedef.pl (which
is called by miniperl) got the wrong information. The solution,
unfortunately, is to reproduce the complexity in makedef.pl
Spotted by Daniel Dragan.
Diffstat (limited to 'perl.h')
-rw-r--r-- | perl.h | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -759,6 +759,9 @@ # endif #endif /* !NO_LOCALE && HAS_SETLOCALE */ +/* XXX The next few defines are unfortunately duplicated in makedef.pl, and + * changes here MUST also be made there */ + #ifdef USE_LOCALE /* These locale things are all subject to change */ # if defined(HAS_NEWLOCALE) \ && defined(LC_ALL_MASK) \ |