[PATCH v1 1/1] lc_numeric_set only defined w/ USE_LOCALE_NUMERIC #2

From: Philip Prindeville <philipp@cpan.org>

From: Philip Prindeville <philipp@cpan.org>

lc_numeric_set must always be protected with #ifdef USE_LOCALE_NUMERIC.

Signed-off-by: Philip Prindeville <philipp@cpan.org>
---
 sv.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/sv.c b/sv.c
index 07865bb2c127c84f900898abfd97fac6164b80c5..28182fbdb94f2e94586dd975434c712775c82e7a 100644
--- a/sv.c
+++ b/sv.c
@@ -13330,10 +13330,12 @@ Perl_sv_vcatpvfn_flags(pTHX_ SV *const sv, const char *const pat, const STRLEN p
 
     SvTAINT(sv);
 
+#ifdef USE_LOCALE_NUMERIC
     if (lc_numeric_set) {
         RESTORE_LC_NUMERIC();   /* Done outside loop, so don't have to
                                    save/restore each iteration. */
     }
+#endif
 }
 
 /* =========================================================================
-- 
2.7.4
0
philipp
7/1/2018 8:21:41 PM
perl.perl5.porters 47435 articles. 0 followers. Follow

0 Replies
53 Views

Similar Articles

[PageSpeed] 38

Reply: