summaryrefslogtreecommitdiff
path: root/locale.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2019-01-30 09:56:15 -0700
committerKarl Williamson <khw@cpan.org>2019-11-30 14:20:06 -0700
commit65c15174221994931f68592a00b0c4d1733229d8 (patch)
tree20119c45ef892e94322a69964ab8955756b08fda /locale.c
parent45cef8fb80248a6318f90219499ff2dbd953ae8c (diff)
downloadperl-65c15174221994931f68592a00b0c4d1733229d8.tar.gz
locale.c white space only
Diffstat (limited to 'locale.c')
-rw-r--r--locale.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/locale.c b/locale.c
index 7ce7b3ed4c..54b51ff920 100644
--- a/locale.c
+++ b/locale.c
@@ -1726,13 +1726,13 @@ S_new_ctype(pTHX_ const char *newctype)
"isxdigit('%s') unexpectedly is %d\n",
name, cBOOL(isxdigit(i))));
}
- if (UNLIKELY(tolower(i) != (int) toLOWER_A(i))) {
+ if (UNLIKELY(tolower(i) != (int) toLOWER_A(i))) {
is_bad = TRUE;
DEBUG_L(PerlIO_printf(Perl_debug_log,
"tolower('%s')=0x%x instead of the expected 0x%x\n",
name, tolower(i), (int) toLOWER_A(i)));
}
- if (UNLIKELY(toupper(i) != (int) toUPPER_A(i))) {
+ if (UNLIKELY(toupper(i) != (int) toUPPER_A(i))) {
is_bad = TRUE;
DEBUG_L(PerlIO_printf(Perl_debug_log,
"toupper('%s')=0x%x instead of the expected 0x%x\n",