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: aec0c0c) | patch
Free iterator when freeing tied hash
authorFather Chrysostomos <sprout@cpan.org>
Sat, 22 Sep 2012 05:01:19 +0000 (22:01 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Sun, 23 Sep 2012 00:10:43 +0000 (17:10 -0700)
commit895cdc83ca4f8ad093074b3bd5d0fbc1d09f7628
tree16c8d394266ec5912ed747c3fdf883556e91dcb3tree | snapshot
parentaec0c0cc27651656899efeb7c4f64d2838a9cf9ecommit | diff
Free iterator when freeing tied hash

The current iterator was leaking when a tied hash was freed or
undefined.

Since we already have a mechanism, namely HvLAZYDEL, for freeing
HvEITER when not referenced elsewhere, we can use that.
hv.c diff | blob | blame | history
t/op/svleak.t diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.