diff options
author | Father Chrysostomos <sprout@cpan.org> | 2014-10-24 21:38:01 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2014-10-24 21:46:13 -0700 |
commit | 96801525df66a32483d0872bdbfffea111d7add5 (patch) | |
tree | 7d18d6a8e4bc6ce182cd952041b1fb53f252a054 /perly.h | |
parent | d40610d16eaa2c4551c2284e77d67581fc9ac258 (diff) | |
download | perl-96801525df66a32483d0872bdbfffea111d7add5.tar.gz |
Remove redundant op_lvalue calls in perly.y
When (\$x)=\$y is compiled, the \ on the lhs gives lvalue context to
its argument by calling op_lvalue. Then later the = gives lvalue con-
text to the \, calling op_lvalue again, which transforms the $x into
an lvref op (via op.c:S_lvref).
I just copied that logic when I extended aliasing via reference to
foreach \$x. But here, we don’t need to call op_lvalue on the $x,
because we know it is going to go through op.c:S_lvref, which doesn’t
care whether it has been through op_lvalue already or not. The end
result is the same.
Diffstat (limited to 'perly.h')
-rw-r--r-- | perly.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -256,6 +256,6 @@ typedef union YYSTYPE /* Generated from: - * e00865c409632c145afdedc53ed48cbd223351eb895754d2775ff66a5aae8533 perly.y + * 6943e6446c58ec52809f6821c15ff693b4d7c34f62c8a1b616279c2a66e3d62f perly.y * d1d4df7b8e30ac9dede664af9179e6e5e7ddc7f2ad9c4eff9e2e5b32c9e16a6e regen_perly.pl * ex: set ro: */ |