This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[perl #45147] Issue with the exists function
authorPeter Martini <PeterCMartini@GMail.com>
Mon, 3 Jan 2011 06:54:04 +0000 (22:54 -0800)
committerFather Chrysostomos <sprout@cpan.org>
Mon, 3 Jan 2011 07:48:19 +0000 (23:48 -0800)
commit54a4274e3c68e0e5bc9baaef00b55c43097929a7
tree3d538940dd33d4be17dac346936f85ba73b34489
parent2831a86cee065b53b74fd19ddcc6a4257484646d
[perl #45147] Issue with the exists function

Perl_av_exists tested to see if regdata magic was present,
but did not have any logic to fetch that data in the positive
key case.  Additionally, in the negative key case, if AvFILL
indicated the key existed, it wouldn't return, and would then
fall through to the logic that treated it like a real array.
AUTHORS
av.c
t/re/pat.t