File: tests-timeout

package info (click to toggle)
haskell-tls 1.4.1-3
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 616 kB
  • sloc: haskell: 7,202; makefile: 3
file content (16 lines) | stat: -rw-r--r-- 494 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Description: Increase timeout for tests
Author: Ilias Tsitsimpis <iliastsi@debian.org>
Forwarded: https://github.com/vincenthz/hs-tls/issues/252
---

--- a/Tests/Tests.hs
+++ b/Tests/Tests.hs
@@ -55,7 +55,7 @@
     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 ()