diff options
author | Karl Williamson <khw@cpan.org> | 2019-01-30 09:56:15 -0700 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2019-11-30 14:20:06 -0700 |
commit | 65c15174221994931f68592a00b0c4d1733229d8 (patch) | |
tree | 20119c45ef892e94322a69964ab8955756b08fda /locale.c | |
parent | 45cef8fb80248a6318f90219499ff2dbd953ae8c (diff) | |
download | perl-65c15174221994931f68592a00b0c4d1733229d8.tar.gz |
locale.c white space only
Diffstat (limited to 'locale.c')
-rw-r--r-- | locale.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -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", |