[DHG_packages] 01/01: tls: Increase timeout for tests
Ilias Tsitsimpis
iliastsi-guest at moszumanska.debian.org
Thu Nov 9 11:46:54 UTC 2017
This is an automated email from the git hooks/post-receive script.
iliastsi-guest pushed a commit to branch master
in repository DHG_packages.
commit 31c8fa327e5055e17568d20f0cd5e63bc5d18bd9
Author: Ilias Tsitsimpis <iliastsi at debian.org>
Date: Thu Nov 9 13:35:03 2017 +0200
tls: Increase timeout for tests
---
p/haskell-tls/debian/changelog | 6 ++++++
p/haskell-tls/debian/patches/series | 1 +
p/haskell-tls/debian/patches/tests-timeout | 17 +++++++++++++++++
3 files changed, 24 insertions(+)
diff --git a/p/haskell-tls/debian/changelog b/p/haskell-tls/debian/changelog
index 11c7a8b..1c902e4 100644
--- a/p/haskell-tls/debian/changelog
+++ b/p/haskell-tls/debian/changelog
@@ -1,3 +1,9 @@
+haskell-tls (1.3.11-4) unstable; urgency=medium
+
+ * Tests fail on slower buildds, so increase the default timeout
+
+ -- Ilias Tsitsimpis <iliastsi at debian.org> Thu, 09 Nov 2017 13:34:46 +0200
+
haskell-tls (1.3.11-3) unstable; urgency=medium
[ Ilias Tsitsimpis ]
diff --git a/p/haskell-tls/debian/patches/series b/p/haskell-tls/debian/patches/series
index fa03b17..010d929 100644
--- a/p/haskell-tls/debian/patches/series
+++ b/p/haskell-tls/debian/patches/series
@@ -1 +1,2 @@
x509-1.7
+tests-timeout
diff --git a/p/haskell-tls/debian/patches/tests-timeout b/p/haskell-tls/debian/patches/tests-timeout
new file mode 100644
index 0000000..6f83fb2
--- /dev/null
+++ b/p/haskell-tls/debian/patches/tests-timeout
@@ -0,0 +1,17 @@
+Description: Increase timeout for tests
+Author: Ilias Tsitsimpis <iliastsi at debian.org>
+---
+
+Index: b/Tests/Tests.hs
+===================================================================
+--- a/Tests/Tests.hs
++++ b/Tests/Tests.hs
+@@ -51,7 +51,7 @@ runTLSPipe params tlsServer tlsClient =
+ d <- B.pack <$> pick (someWords8 256)
+ run $ writeChan startQueue d
+ -- receive it
+- dres <- run $ timeout 10000000 $ readChan resultQueue
++ dres <- run $ timeout 600000000 $ readChan resultQueue
+ -- check if it equal
+ Just d `assertEq` dres
+ return ()
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-haskell/DHG_packages.git
More information about the Pkg-haskell-commits
mailing list