diff options
Diffstat (limited to 'toke.c')
-rw-r--r-- | toke.c | 5 |
1 files changed, 4 insertions, 1 deletions
@@ -5233,8 +5233,10 @@ Perl_yylex(pTHX) goto just_a_word_zero_gv; } s++; + { + OP *attrs; + switch (PL_expect) { - OP *attrs; case XOPERATOR: if (!PL_in_my || PL_lex_state != LEX_NORMAL) break; @@ -5374,6 +5376,7 @@ Perl_yylex(pTHX) } TOKEN(COLONATTR); } + } if (!PL_lex_allbrackets && PL_lex_fakeeof >= LEX_FAKEEOF_CLOSING) { s--; TOKEN(0); |