This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
related to [perl #113060] assert CopSTASH(cx->blk_oldcop)
authorReini Urban <rurban@x-ray.at>
Tue, 29 May 2012 21:06:00 +0000 (16:06 -0500)
committerFather Chrysostomos <sprout@cpan.org>
Tue, 29 May 2012 21:55:54 +0000 (14:55 -0700)
commitfb55feefe971ae1552e21360ba05c793b60fefd6
tree96affe1a5ccf27858f9874906f55ac60d761ebed
parent014243a274e5fe909b0735ff5f198a4edc5f35c4
related to [perl #113060] assert CopSTASH(cx->blk_oldcop)

HvNAME_HEK((HV*)CopSTASH(cx->blk_oldcop)) does some implicit assumptions, which should
better be asserted. Also record CX pp_caller reads besides PUSH and POP.
pp_ctl.c