This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
toke.c: Remove redundant check
authorFather Chrysostomos <sprout@cpan.org>
Tue, 31 Dec 2013 05:18:54 +0000 (21:18 -0800)
committerFather Chrysostomos <sprout@cpan.org>
Tue, 31 Dec 2013 05:18:54 +0000 (21:18 -0800)
commit5aa91856e21c93226d08f19eb69098f224de5fff
tree306d43f14167e40a8e63360acdee409267ddfad9
parentd955f84cfebcbed74088977f0bc7b1162c00a426
toke.c: Remove redundant check

(and turn it into an assertion.)

PL_lex_repl can only be set here if we are parsing a substitution
(OP_SUBST) or transliteration (OP_TRANS).  I believe this check
has been unnecessary since perl 5.000, which it was added.
toke.c