about summary refs log tree commit diff
path: root/pkgs/development/perl-modules/dbix-class-fix-52leaks.patch
diff options
context:
space:
mode:
authorPascal Wittmann <PascalWittmann@gmx.net>2015-11-11 09:41:57 +0100
committerPascal Wittmann <PascalWittmann@gmx.net>2015-11-11 09:41:57 +0100
commit2eec8b978cc80d7e7f3296aedb5b28306781f559 (patch)
tree7b66bdbd34fd691b6660e046684355831b6fbe84 /pkgs/development/perl-modules/dbix-class-fix-52leaks.patch
parent555530714e231ec052aea391c2510a7f46a994a5 (diff)
parent3fca9ad3abe7971eb41f335d1469e4f0856e4e33 (diff)
downloadnixlib-2eec8b978cc80d7e7f3296aedb5b28306781f559.tar
nixlib-2eec8b978cc80d7e7f3296aedb5b28306781f559.tar.gz
nixlib-2eec8b978cc80d7e7f3296aedb5b28306781f559.tar.bz2
nixlib-2eec8b978cc80d7e7f3296aedb5b28306781f559.tar.lz
nixlib-2eec8b978cc80d7e7f3296aedb5b28306781f559.tar.xz
nixlib-2eec8b978cc80d7e7f3296aedb5b28306781f559.tar.zst
nixlib-2eec8b978cc80d7e7f3296aedb5b28306781f559.zip
Merge pull request #10953 from rycee/bump/perl-packages
Bump versions of some Perl packages
Diffstat (limited to 'pkgs/development/perl-modules/dbix-class-fix-52leaks.patch')
-rw-r--r--pkgs/development/perl-modules/dbix-class-fix-52leaks.patch23
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};