This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Make PL_compcv visible to BEGIN blocks
authorFather Chrysostomos <sprout@cpan.org>
Wed, 26 Sep 2012 15:47:28 +0000 (08:47 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Wed, 26 Sep 2012 15:55:12 +0000 (08:55 -0700)
commit85ffec368212c676791d13ff9743912238325bc2
tree043450b1073754b2f274ac86b2e80786978300e8
parent9c62c74d253b05d5e0ec6c62885030bfbe5ccda3
Make PL_compcv visible to BEGIN blocks

This allows BEGIN { XS_func(); } to access the currently-com-
piling pad.

BEGIN blocks were unlike any other subroutine or special block in that
PL_compcv would be set to the BEGIN block itself at run time.
op.c