In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/4d88a840da7e1443b8de7e08e084c6063ded18b6?hp=92da3157402727e9c7bdca6b9497423ca094acbe>
- Log ----------------------------------------------------------------- commit 4d88a840da7e1443b8de7e08e084c6063ded18b6 Author: Father Chrysostomos <[email protected]> Date: Sun Dec 16 17:00:45 2012 -0800 Make DosGlob.t more resilient If the sv count goes *down* (which doesnât happen on my machine, but see <CANgJU+W8_nVg9-YVRBe2r=zycbu9-r3rpf0tbh-xwrtvxyh...@mail.gmail.com>), we certainly donât have a leak. M ext/File-DosGlob/t/DosGlob.t commit c53e3a758f27b58511d4fe7bc5ba1068c92552f7 Author: Father Chrysostomos <[email protected]> Date: Sun Dec 16 06:21:02 2012 -0800 perl5180delta: Mention 2 more broken+patched modules M Porting/perl5180delta.pod ----------------------------------------------------------------------- Summary of changes: Porting/perl5180delta.pod | 8 ++++++++ ext/File-DosGlob/t/DosGlob.t | 3 ++- 2 files changed, 10 insertions(+), 1 deletions(-) diff --git a/Porting/perl5180delta.pod b/Porting/perl5180delta.pod index a6ce673..776961f 100644 --- a/Porting/perl5180delta.pod +++ b/Porting/perl5180delta.pod @@ -349,6 +349,14 @@ L<Coro> version 6.10 =item * +L<Crypt::IDEA> version 1.08 + +=item * + +L<Crypt::Twofish> version 2.15 + +=item * + L<Data::Dump::Streamer> version 2.34 =item * diff --git a/ext/File-DosGlob/t/DosGlob.t b/ext/File-DosGlob/t/DosGlob.t index b3e0043..600b87a 100644 --- a/ext/File-DosGlob/t/DosGlob.t +++ b/ext/File-DosGlob/t/DosGlob.t @@ -151,5 +151,6 @@ SKIP: { $count = sv_count(); eval '$x+'x(1+rand() * 100) . '<*>'; $count2 = sv_count(); - is $count2, $count, 'no leak when partly iterated caller is freed'; + cmp_ok $count2, '<=', $count, + 'no leak when partly iterated caller is freed'; } -- Perl5 Master Repository
