diff options
Diffstat (limited to 'pkgs/development/perl-modules/dbix-class-fix-52leaks.patch')
-rw-r--r-- | pkgs/development/perl-modules/dbix-class-fix-52leaks.patch | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/pkgs/development/perl-modules/dbix-class-fix-52leaks.patch b/pkgs/development/perl-modules/dbix-class-fix-52leaks.patch new file mode 100644 index 000000000000..84af4a5acf1c --- /dev/null +++ b/pkgs/development/perl-modules/dbix-class-fix-52leaks.patch @@ -0,0 +1,23 @@ +From e9d552de92cde6552f35cd45a3572df1e25609cc Mon Sep 17 00:00:00 2001 +From: Peter Rabbitson <ribasushi@cpan.org> +Date: Tue, 19 May 2015 05:49:48 +0200 +Subject: [PATCH] Make sure tests pass without a compiler present (another step + to RT#74706) + +--- a/t/52leaks.t ++++ b/t/52leaks.t +@@ -446,6 +446,14 @@ for my $addr (keys %$weak_registry) { + delete $weak_registry->{$addr} + unless $cleared->{hash_merge_singleton}{$weak_registry->{$addr}{weakref}{behavior}}++; + } ++ elsif ($names =~ /^B::Hooks::EndOfScope::PP::_TieHintHashFieldHash/m) { ++ # there is one tied lexical which stays alive until GC time ++ # https://metacpan.org/source/ETHER/B-Hooks-EndOfScope-0.15/lib/B/Hooks/EndOfScope/PP/FieldHash.pm#L24 ++ # simply ignore it here, instead of teaching the leaktracer to examine ties ++ # the latter is possible yet terrible: https://github.com/dbsrgits/dbix-class/blob/v0.082820/t/lib/DBICTest/Util/LeakTracer.pm#L113-L117 ++ delete $weak_registry->{$addr} ++ unless $cleared->{bheos_pptiehinthashfieldhash}++; ++ } + elsif ($names =~ /^DateTime::TimeZone::UTC/m) { + # DT is going through a refactor it seems - let it leak zones for now + delete $weak_registry->{$addr}; |