summaryrefslogtreecommitdiff
path: root/locale.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2021-03-28 18:32:37 -0600
committerKarl Williamson <khw@cpan.org>2022-09-10 14:19:07 -0600
commitcd7ba9418e8240306639e2f1fffa4abbf4bfeb5a (patch)
treed1fbf3e2b5139f4f2d9e5deb3676746129cdf74a /locale.c
parentefda6cc7c5338d7c9a482ac31ca4166045338adf (diff)
downloadperl-cd7ba9418e8240306639e2f1fffa4abbf4bfeb5a.tar.gz
locale.c: Clean up two DEBUG stmts
STMT_START...END aren't required in DEBUG() calls, as that macro already wraps its argument with those. So, they are just clutter here.
Diffstat (limited to 'locale.c')
-rw-r--r--locale.c12
1 files changed, 4 insertions, 8 deletions
diff --git a/locale.c b/locale.c
index 4c70779014..62de4cf382 100644
--- a/locale.c
+++ b/locale.c
@@ -2455,10 +2455,8 @@ S_win32_setlocale(pTHX_ int category, const char* locale)
#else
result = setlocale(category, locale);
#endif
- DEBUG_L(STMT_START {
- PerlIO_printf(Perl_debug_log, "%s\n",
- setlocale_debug_string_r(category, locale, result));
- } STMT_END);
+ DEBUG_L(PerlIO_printf(Perl_debug_log, "%s\n",
+ setlocale_debug_string_r(category, locale, result)));
if (! override_LC_ALL) {
return result;
@@ -2484,10 +2482,8 @@ S_win32_setlocale(pTHX_ int category, const char* locale)
}
result = setlocale(LC_ALL, NULL);
- DEBUG_L(STMT_START {
- PerlIO_printf(Perl_debug_log, "%s\n",
- setlocale_debug_string_c(LC_ALL, NULL, result));
- } STMT_END);
+ DEBUG_L(PerlIO_printf(Perl_debug_log, "%s\n",
+ setlocale_debug_string_c(LC_ALL, NULL, result)));
return result;
}