diff options
| author | Karl Williamson <khw@cpan.org> | 2015-09-08 09:53:48 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2015-09-08 10:05:56 -0600 |
| commit | 5d1187d1639ce42a8a9283c8282136fa16d41e50 (patch) | |
| tree | eba65a6d8c24661517f71fd3645c794411459d24 /embed.h | |
| parent | 6b058d4267db1fda2ada9ef3729c7477bbfa07c6 (diff) | |
| download | perl-5d1187d1639ce42a8a9283c8282136fa16d41e50.tar.gz | |
Add code for debugging locale initialization
This initialization is done before the processing of command line
arguments, so that it has to be handled specially. This commit changes
the initialization code to output debugging information if the
environment variable PERL_DEBUG_LOCALE_INIT is set.
I don't see the need to document this outside the source, as anyone who
is using it would be reading the source anyway; it's of highly
specialized use.
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -781,6 +781,9 @@ #if defined(DEBUGGING) #define pad_setsv(a,b) Perl_pad_setsv(aTHX_ a,b) #define pad_sv(a) Perl_pad_sv(aTHX_ a) +# if defined(USE_LOCALE) && (defined(PERL_IN_LOCALE_C) || defined (PERL_EXT_POSIX)) +#define _setlocale_debug_string Perl__setlocale_debug_string +# endif #endif #if defined(HAS_SIGACTION) && defined(SA_SIGINFO) #define csighandler Perl_csighandler |