From: Karl Williamson <public@khwilliamson.com>
Date: Fri, 28 Jun 2013 21:43:54 +0000 (-0600)
Subject: Properly determine if in locale for NV stringification
X-Git-Tag: upstream/5.20.0~2787
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=7187d38ecd872451f4332f094b3d173fe8d57255;p=platform%2Fupstream%2Fperl.git

Properly determine if in locale for NV stringification

Commit 68e8f474bc686a86c064b695b9c7400313d7af65 used the wrong macro to
determine if the operation is within the scope of 'use locale'.  It also
has to operate under 'use locale 'not_characters'.

Tests for this are coming in the patch for [perl #118197].
---

diff --git a/sv.c b/sv.c
index 0e33556..a42b4a8 100644
--- a/sv.c
+++ b/sv.c
@@ -2928,7 +2928,7 @@ Perl_sv_2pv_flags(pTHX_ SV *const sv, STRLEN *const lp, const I32 flags)
              * change to the C locale during the Gconvert and then change back.
              * But if we're already in the C locale (PL_numeric_standard is
              * TRUE in that case), no need to do any changing */
-            if (PL_numeric_standard || IN_LOCALE_RUNTIME) {
+            if (PL_numeric_standard || IN_SOME_LOCALE_FORM_RUNTIME) {
                 Gconvert(SvNVX(sv), NV_DIG, 0, s);
             }
             else {