This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
https://perl5.git.perl.org / perl5.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: bf3d870) | patch
Make prototype call FETCH before checking CORE:: prefix
authorFather Chrysostomos <sprout@cpan.org>
Sat, 26 May 2012 13:00:01 +0000 (06:00 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Thu, 7 Jun 2012 15:18:53 +0000 (08:18 -0700)
commit6954f42f948dcf1dba2014aa06dd5c33b7561992
treeae3709c7181f41b050a51cd1f510ab5b9556ac6etree | snapshot
parentbf3d870f8b8accd379ab520c1ff1daa10317d27dcommit | diff
Make prototype call FETCH before checking CORE:: prefix

$ perl5.16.0 -e '"CORE::length" =~ /(.*)/; warn prototype $1;'
Warning: something's wrong at -e line 1.
$ perl5.16.0 -e 'warn prototype "CORE::length"'
_ at -e line 1.

Since sv_2cv calls get-magic, the easiest solution is to copy the
argument if it is magical.
pp.c diff | blob | blame | history
t/comp/proto.t diff | blob | blame | history
t/echo3001 [new file with mode: 0644] blob
t/utf67682.pl [new file with mode: 0644] blob
Unnamed repository; edit this file 'description' to name the repository.