This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Stop using the value of PL_expect
authorFather Chrysostomos <sprout@cpan.org>
Fri, 22 Aug 2014 12:53:42 +0000 (05:53 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Mon, 25 Aug 2014 02:02:57 +0000 (19:02 -0700)
commitc5e7362b9fa800205fbbf248000e4baf621d7bec
treeeacda9d256ab5e9e0ea996391f89fe324dffb59e
parent6c893454033f13bf5cdcb81ab0c48637bcd80713
Stop using the value of PL_expect

The changes in commits leading up to this one avoided unnecessary
PL_expect assignments that would soon be clobbered by this
‘PL_expect = PL_lex_expect’ that restores the previous value.

Hence, we no longer even need to read the value of PL_lex_expect since
PL_expect hasn’t changed.

Just one piece of code (KEY_package) was setting PL_lex_expect
directly instead of having force_next copy it from PL_expect, so this
commit changes it to set PL_expect to the correct value.
toke.c