This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fixing crash in hint.t
authorFather Chrysostomos <sprout@cpan.org>
Wed, 21 Dec 2011 07:06:20 +0000 (23:06 -0800)
committerFather Chrysostomos <sprout@cpan.org>
Wed, 21 Dec 2011 07:30:04 +0000 (23:30 -0800)
commit7ef9d42cef95562593dd30e0fab41e7e09fd0e0e
treeaa46785cdeac8436243902477a4b0a7c68709a6d
parentb89b72572533bd5be1cc901f1d10aadca7e64154
Fixing crash in hint.t

The test that was added in 95cf23680e tickled another bug in the same
code in Perl_hv_copy_hints_hv than the one it fixed, but not on the
committer’s machine.

Not only can a HE from a tied hash have a null entry, but it can also
have an SV for its key.  Treating it as a hek and trying to read flags
from it may result in other code being told to free something it
shouldn’t because the SV, when looked at as a hek, appeared to have
the HVhek_FREEKEY flag.
hv.c