This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Teach ck_entersub_args_proto about non-GV names
authorFather Chrysostomos <sprout@cpan.org>
Fri, 12 Sep 2014 06:52:41 +0000 (23:52 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Mon, 15 Sep 2014 13:19:34 +0000 (06:19 -0700)
commita65cc145b2ce31d135006c2fb8e7b89e0843f3b4
tree272a323fcf3f26d9b2f073e56194d39ac7429307
parent230b3caa7e7f84ecf3fa68999603884d4b196166
Teach ck_entersub_args_proto about non-GV names

Now ck_subr no longer needs to vivify GVs:

$ ./miniperl -e 'sub foo{} BEGIN { warn $::{foo} } foo(); BEGIN { warn $::{foo} }'
CODE(0x7fc98282ad98) at -e line 1.
CODE(0x7fc98282ad98) at -e line 1.

Previously it was like this:

$ ./miniperl -e 'sub foo{} BEGIN { warn $::{foo} } foo(); BEGIN { warn $::{foo} }'
CODE(0x7f8ef082ad98) at -e line 1.
*main::foo at -e line 1.
op.c
t/op/symbolcache.t