diff options
| author | Karl Williamson <khw@cpan.org> | 2014-06-01 20:07:30 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2014-06-05 11:23:00 -0600 |
| commit | 7738054cc936a59cb4b0e0da328f287c9ec8a98a (patch) | |
| tree | da7267d8e7c56b3ca5721129f5931aab591493dd /intrpvar.h | |
| parent | aaaeb2977e88223f68d9f7a7009ef4cf1f735c72 (diff) | |
| download | perl-7738054cc936a59cb4b0e0da328f287c9ec8a98a.tar.gz | |
Allow dynamic lock of LC_NUMERIC
When processing version strings, the radix character must be a dot even
if we otherwise would be using some other character. vutil.c
upg_version() changes to the dot, but calls sv_catpvf() which may try to
change the character to something else. This commit introduces a way to
lock the character to a dot around the call to sv_catpvf()
vutil.c is cpan-upstream, but already blead and cpan have diverged, so
this just updates the SHA of the new version
Diffstat (limited to 'intrpvar.h')
| -rw-r--r-- | intrpvar.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/intrpvar.h b/intrpvar.h index 17b2551773..3e7d4a36f7 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -565,7 +565,7 @@ PERLVARI(I, perl_destruct_level, signed char, 0) #ifdef USE_LOCALE_NUMERIC -PERLVARI(I, numeric_standard, bool, TRUE) +PERLVARI(I, numeric_standard, int, TRUE) /* Assume simple numerics */ PERLVARI(I, numeric_local, bool, TRUE) /* Assume local numerics */ |