File: 0001-TODO-out-an-undeterministically-failing-test.patch

package info (click to toggle)
libthread-pool-perl 0.36-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 288 kB
  • sloc: perl: 14; makefile: 2
file content (31 lines) | stat: -rw-r--r-- 906 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
From 67291e1bb5674232a6e39e968f435dacd00fecf9 Mon Sep 17 00:00:00 2001
From: Niko Tyni <ntyni@debian.org>
Date: Mon, 21 Dec 2015 23:52:39 +0200
Subject: [PATCH] TODO out an undeterministically failing test

On a loaded machine, the number of todo jobs seems to vary up to
at least 5.

Bug-Debian: https://bugs.debian.org/799718
---
 t/Pool01.t | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/t/Pool01.t b/t/Pool01.t
index ae534d4..aab1cde 100644
--- a/t/Pool01.t
+++ b/t/Pool01.t
@@ -74,7 +74,10 @@ my $removed = $pool->removed;
 ok( ($removed >= 0 and $removed <= 5),	'check number of removed, #1' );
 
 $todo = $pool->todo;
+TODO: {
+    local $::TODO = "can vary up to at least 5 on loaded systems";
 ok( ($todo >= 0 and $todo <= 3),	'check # jobs todo, #2' );
+}
 
 my @result = $pool->result_dontwait( $jobid1 );
 ok( (!@result or ("@result" eq 'i h g')), 'check result_dontwait' );
-- 
2.6.4