This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
https://perl5.git.perl.org / perl5.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 41e8cbf) | patch
toke.c:S_lop: Don’t set PL_expect if PL_nexttoke
authorFather Chrysostomos <sprout@cpan.org>
Fri, 22 Aug 2014 00:59:06 +0000 (17:59 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Mon, 25 Aug 2014 02:02:56 +0000 (19:02 -0700)
commit19f1898a1ae4536b68389fbd144330251a7547d6
treeb71a63e43ae3a8f4539f4e5b98475ae6b51782d4tree | snapshot
parent41e8cbf436fe4165360381067f6fda82f6565690commit | diff
toke.c:S_lop: Don’t set PL_expect if PL_nexttoke

Don’t set PL_expect if we have a ‘next token’, because when it is
popped off the pending token stack PL_expect will be set to the
saved value, clobbering this assigned value.  So the assignment is
unnecessary.
toke.c diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.