summaryrefslogtreecommitdiff
path: root/locale.c
diff options
context:
space:
mode:
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;
}