diff options
author | Andreas K. Hüttel <dilfridge@gentoo.org> | 2019-10-21 18:40:01 +0200 |
---|---|---|
committer | Andreas K. Hüttel <dilfridge@gentoo.org> | 2019-10-21 18:40:01 +0200 |
commit | 3b62ac53d09a2e39ae8db596856d2aa192171d27 (patch) | |
tree | 87694f5c18b3d588667452b0c419e577edbccd6d /dev-perl/IO-Event/files | |
parent | dev-perl/IO-Event: Remove old (diff) | |
download | gentoo-3b62ac53d09a2e39ae8db596856d2aa192171d27.tar.gz gentoo-3b62ac53d09a2e39ae8db596856d2aa192171d27.tar.bz2 gentoo-3b62ac53d09a2e39ae8db596856d2aa192171d27.zip |
dev-perl/IO-Event: Add patch by Niko Tyni to fix tests
Closes: https://bugs.gentoo.org/659600
Package-Manager: Portage-2.3.76, Repoman-2.3.17
Signed-off-by: Andreas K. Hüttel <dilfridge@gentoo.org>
Diffstat (limited to 'dev-perl/IO-Event/files')
-rw-r--r-- | dev-perl/IO-Event/files/IO-Event-0.813.0-forked2.t.patch | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/dev-perl/IO-Event/files/IO-Event-0.813.0-forked2.t.patch b/dev-perl/IO-Event/files/IO-Event-0.813.0-forked2.t.patch new file mode 100644 index 000000000000..0691b51eeff1 --- /dev/null +++ b/dev-perl/IO-Event/files/IO-Event-0.813.0-forked2.t.patch @@ -0,0 +1,35 @@ +From e11dc91080151bb59d73e72c3c0a3409c1b999ef Mon Sep 17 00:00:00 2001 +From: Niko Tyni <ntyni@debian.org> +Date: Sat, 12 Dec 2015 11:33:34 +0200 +Subject: [PATCH] Fix undeterministic test failures in t/forked2.t + +The parent process may get both the eof event from an old connection +and the connect event from a new connection at the same time, and in an +unpredictable order. If the connect event comes first, the handler may +decrement the test counter to zero and make the eof handler think the +testing is already over. + +Having the child synchronize on the eof event before making a new +connection fixes this race. + +Bug-Debian: https://bugs.debian.org/730908 +Bug: https://rt.cpan.org/Ticket/Display.html?id=92200 +--- + t/forked.tt | 1 + + 1 file changed, 1 insertion(+) + +diff --git a/t/forked.tt b/t/forked.tt +index e56c7fa..0d9ce18 100755 +--- a/t/forked.tt ++++ b/t/forked.tt +@@ -265,6 +265,7 @@ if ($child = fork()) { + } + print "# CHILD closing\n"; + close($s); ++ syncto("e"); + } + } else { + die "fork: $!"; +-- +2.6.2 + |