diff options
author | Father Chrysostomos <sprout@cpan.org> | 2013-11-06 10:55:36 -0800 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2013-11-08 08:15:58 -0800 |
commit | 466112bb8d1a607f81f127e9641f40ce1164c3e7 (patch) | |
tree | f997493298d1683bbea0ded8a5f818372da4ae38 /keywords.c | |
parent | e0707a4ad5fb4738da21729f352b9e3f6660ae1d (diff) | |
download | perl-466112bb8d1a607f81f127e9641f40ce1164c3e7.tar.gz |
toke.c: Remove dead code handling <FH> //
A few lines of code added by this commit:
commit 6f33ba736d46c2f5bfdb2405fd09d82ec18a1d07
Author: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Sun Aug 25 18:42:46 2002 +0000
Fix parsing problems with the // operator.
Make // able to follow various unary operators used without
arguments or parens (shift, pop, getc, pos, readline,
readlink, undef, umask, and the filetest operators), as
well as the <FH> operator.
were already unreachable when they were added, specifically the code
for handling // after <FH> (which is fortunate, because XTERMORDORDOR
after <FH> would break <FH>+1).
S_scan_inputsymbol sets pl_yylval.ival to OP_NULL, since it has
already created the ops; it has done so since perl 5.000. So this
branch is never reached when parsing <FH>.
The if-block containing these lines has had ‘|| op_type ==
OP_READLINE’ since perl 5.000, which has also always been redundant
for the same reason.
Diffstat (limited to 'keywords.c')
0 files changed, 0 insertions, 0 deletions