diff options
| author | Karl Williamson <khw@cpan.org> | 2018-01-01 23:03:34 -0700 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2018-01-30 22:35:09 -0700 |
| commit | 4c68b8158cd1ae60d36ecf980d2cdf34a560ccaf (patch) | |
| tree | 0a65da969af2512d75589e491d198124c95b2440 /embedvar.h | |
| parent | 9821811fe1a93f19deb209a286ad4fae53a3ebb1 (diff) | |
| download | perl-4c68b8158cd1ae60d36ecf980d2cdf34a560ccaf.tar.gz | |
Avoid some unnecessary changing of locales
The LC_NUMERIC locale category is kept so that generally the decimal
point (radix) is a dot. For some (mostly) output purposes, it needs to
be swapped into the program's current underlying locale so that a
non-dot can be printed.
This commit changes things so that if the current underlying locale uses
a decimal point, the swap doesn't happen, as it's not needed.
Diffstat (limited to 'embedvar.h')
| -rw-r--r-- | embedvar.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/embedvar.h b/embedvar.h index 0922ee45d1..d97f493dbb 100644 --- a/embedvar.h +++ b/embedvar.h @@ -221,6 +221,7 @@ #define PL_numeric_radix_sv (vTHX->Inumeric_radix_sv) #define PL_numeric_standard (vTHX->Inumeric_standard) #define PL_numeric_underlying (vTHX->Inumeric_underlying) +#define PL_numeric_underlying_is_standard (vTHX->Inumeric_underlying_is_standard) #define PL_ofsgv (vTHX->Iofsgv) #define PL_oldname (vTHX->Ioldname) #define PL_op (vTHX->Iop) |