diff options
| author | Zefram <zefram@fysh.org> | 2018-01-16 08:04:08 +0000 |
|---|---|---|
| committer | Zefram <zefram@fysh.org> | 2018-01-16 08:04:08 +0000 |
| commit | 097ff42c3bba30230d3512b3de153c75cd2e43c9 (patch) | |
| tree | f4fd9e0d212719451844928c695b853a1ac28617 /perly.h | |
| parent | 6661956a23de82b41adc406200054293d6d7aded (diff) | |
| download | perl-097ff42c3bba30230d3512b3de153c75cd2e43c9.tar.gz | |
fix parsing of braced subscript after parens
Where an arrow is omitted between subscripts, if a parenthesised
subscript is followed by a braced one, PL_expect was getting set to
XBLOCK due to code intended for "foreach (...) {...}". This broke
bareword autoquotation, and the parsing of operators following the
braced subscript. Alter PL_expect from XBLOCK to XOPERATOR following
a parenthesised subscript. Fixes [perl #8045].
Diffstat (limited to 'perly.h')
| -rw-r--r-- | perly.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -181,6 +181,6 @@ int yyparse (void); /* Generated from: - * 78f9e1daf948a161b43e7457943b7d91cada7c92c8b941a1c1dbbc23c2c10aa8 perly.y + * fca93dc4b6a371876339e9ad458685bd6fe71cfe326ff40ea9c78a9acf02da64 perly.y * b6fae5748f9bef6db4740aa5e122b84ac5181852d42474d0ecad621fa4253306 regen_perly.pl * ex: set ro: */ |