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: 86cc158) | patch
restore PL_tmps_floor on exit
authorDavid Mitchell <davem@iabyn.com>
Wed, 28 Oct 2015 08:28:56 +0000 (08:28 +0000)
committerDavid Mitchell <davem@iabyn.com>
Wed, 3 Feb 2016 09:18:32 +0000 (09:18 +0000)
commit3706fcea6257cb3ac83ac11700364056e0799895
tree2aca51972376394b429f389b14c10f02e029a274tree | snapshot
parent86cc158350c1bc1d2159ec3dbf01e2800bca07dccommit | diff
restore PL_tmps_floor on exit

A couple of places were expecting dounwind(-1); LEAVE_SCOPE(0);
to restore PL_tmps_floor, since its old value was saved on the savestack.
Since that's now stored in the context struct instead, do
a POPBLOCK(&cxstack[0]).

This problem only showed up on 'make test' rather than 'make
test_harness', since only the former sets PERL_DESTRUCT_LEVEL.
ext/XS-APItest/APItest.xs diff | blob | blame | history
perl.c diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.