This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[perl #124099] Wrong CvOUTSIDE in find_lexical_cv
authorFather Chrysostomos <sprout@cpan.org>
Fri, 27 Mar 2015 19:39:54 +0000 (12:39 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Fri, 27 Mar 2015 19:39:54 +0000 (12:39 -0700)
commitd655d9a2c4d4884d0edf5364a3aafbc8b0b8de38
tree8f220e1d560a599239718bcd84414bbf08ad79ce
parent71622e40793536aa4f2ace7ffc704cc78151fd26
[perl #124099] Wrong CvOUTSIDE in find_lexical_cv

Instead of following the chain of CvOUTSIDE pointers, I had it always
looking at the CvOUTSIDE pointer of the current PL_compcv.  So any
time it had to dig down more than one level, it had a chance of crash-
ing or looping.
op.c
t/op/lexsub.t