diff --git a/locale.c b/locale.c index 19409d06ffa8..c6eb0b1513a5 100644 --- a/locale.c +++ b/locale.c @@ -2671,10 +2671,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; @@ -2700,10 +2698,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; }