summaryrefslogtreecommitdiff
path: root/utf8.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2022-06-26 09:44:26 -0600
committerKarl Williamson <khw@cpan.org>2022-07-03 19:39:24 -0600
commit1629a27e37c8a79d25c1709122a7bb67aeb513d7 (patch)
tree7f2febf57d19d2f72fb3b3718c464ed3ede3a722 /utf8.c
parent85bf3b944a4989111c23c43f6ee53a3c198e6412 (diff)
downloadperl-1629a27e37c8a79d25c1709122a7bb67aeb513d7.tar.gz
locale: Change macro name to be C conformant
C reserves leading underscores for system use; this commit fixes _CHECK_AND_WARN_PROBLEMATIC_LOCALE to be CHECK_AND_WARN_PROBLEMATIC_LOCALE_
Diffstat (limited to 'utf8.c')
-rw-r--r--utf8.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/utf8.c b/utf8.c
index 1da6163ae8..a9d57e8866 100644
--- a/utf8.c
+++ b/utf8.c
@@ -3000,7 +3000,7 @@ Perl__to_uni_fold_flags(pTHX_ UV c, U8* p, STRLEN *lenp, U8 flags)
if (flags & FOLD_FLAGS_LOCALE) {
/* Treat a non-Turkic UTF-8 locale as not being in locale at all,
* except for potentially warning */
- _CHECK_AND_WARN_PROBLEMATIC_LOCALE;
+ CHECK_AND_WARN_PROBLEMATIC_LOCALE_;
if (IN_UTF8_CTYPE_LOCALE && ! PL_in_utf8_turkic_locale) {
flags &= ~FOLD_FLAGS_LOCALE;
}
@@ -3552,7 +3552,7 @@ S_turkic_uc(pTHX_ const U8 * const p, const U8 * const e,
L1_func_extra_param, turkic) \
\
if (flags & (locale_flags)) { \
- _CHECK_AND_WARN_PROBLEMATIC_LOCALE; \
+ CHECK_AND_WARN_PROBLEMATIC_LOCALE_; \
if (IN_UTF8_CTYPE_LOCALE) { \
if (UNLIKELY(PL_in_utf8_turkic_locale)) { \
UV ret = turkic(p, e, ustrp, lenp); \