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: 97f2561) | patch
pp_leavewhen: simply for() handling
authorDavid Mitchell <davem@iabyn.com>
Mon, 5 Oct 2015 15:23:07 +0000 (16:23 +0100)
committerDavid Mitchell <davem@iabyn.com>
Wed, 3 Feb 2016 08:59:40 +0000 (08:59 +0000)
commit590529d80b3917f351c7a3d2593fc43c6a15d04c
treeec1a91abc0bfe05083ff66e918f42a062e19d18etree | snapshot
parent97f2561e109775e544e99ab5350e8bc88556561ccommit | diff
pp_leavewhen: simply for() handling

when returning control to an enclosing for loop, the next op to execute
(i.e. my_op->op_nextop) will be an OP_UNSTACK, which handles popping stuff
of stacks and doing PERL_ASYNC_CHECK(); so no need to do it here too.
pp_ctl.c diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.