This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Make B::Concise handle subrefs in stashes
authorFather Chrysostomos <sprout@cpan.org>
Mon, 11 Sep 2017 04:46:41 +0000 (21:46 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Sun, 8 Oct 2017 20:02:03 +0000 (13:02 -0700)
commitfba0c0a6c06a285db6583840a68940964bff1f87
treee43507035daa8414ed8efb729c7ac3a3ac6ff7dc
parent59a63b1b72b128736f53b046e6159d435a82f949
Make B::Concise handle subrefs in stashes

The concise_stashref sub, for dumping all subroutines in a package,
would assign the value of a stash element to *s, and then use *s
to access the code ref in it.  If you do *s = *foo and then later
*s = \&bar, then you have assigned \&bar to *foo{CODE}, and even
a localisation of *s beforehand will not help.  That is exactly
what B::Concise was doing when dumping a package with some subref
elements.
ext/B/B/Concise.pm