diff options
| -rw-r--r-- | dquote_static.c | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/dquote_static.c b/dquote_static.c index 76fb86dfaf..4eaa4b1089 100644 --- a/dquote_static.c +++ b/dquote_static.c @@ -70,18 +70,18 @@ S_grok_bslash_c(pTHX_ const char source, const bool output_warning) if (output_warning && ! isCNTRL_L1(result)) { /* We use isCNTRL_L1 above and not simply isCNTRL, because on EBCDIC * machines, things like \cT map into a C1 control. */ - U8 clearer[3]; - U8 i = 0; - if (! isWORDCHAR(result)) { - clearer[i++] = '\\'; - } - clearer[i++] = result; - clearer[i++] = '\0'; - - Perl_ck_warner(aTHX_ packWARN(WARN_SYNTAX), - "\"\\c%c\" is more clearly written simply as \"%s\"", - source, - clearer); + U8 clearer[3]; + U8 i = 0; + if (! isWORDCHAR(result)) { + clearer[i++] = '\\'; + } + clearer[i++] = result; + clearer[i++] = '\0'; + + Perl_ck_warner(aTHX_ packWARN(WARN_SYNTAX), + "\"\\c%c\" is more clearly written simply as \"%s\"", + source, + clearer); } return result; |