diff options
author | David Mitchell <davem@iabyn.com> | 2016-12-07 15:15:26 +0000 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2016-12-07 15:15:26 +0000 |
commit | 6d17784b921190b24fedff274376615eec2e3733 (patch) | |
tree | f0a8b07078f71710e2bb18f1b5560d9d0258d868 | |
parent | 5247d03dd8125594173a7d27bc27bcc08b01b7b1 (diff) | |
download | perl-6d17784b921190b24fedff274376615eec2e3733.tar.gz |
perly.c: silence a -Wempty-body warning
perly.c:350:21: warning: suggest braces around empty body in an ‘if’ statement [
-Wempty-body]
-rw-r--r-- | perly.c | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -346,8 +346,9 @@ Perl_yyparse (pTHX_ int gramtype) YYDPRINTF ((Perl_debug_log, "Reading a token:\n")); parser->yychar = yylex(); assert(parser->yychar >= 0); - if (parser->yychar == YYEOF) + if (parser->yychar == YYEOF) { YYDPRINTF ((Perl_debug_log, "Now at end of input.\n")); + } /* perly.tab is shipped based on an ASCII system, so need * to index it with characters translated to ASCII. * Although it's not designed for this purpose, we can use |