summaryrefslogtreecommitdiff
blob: 8dce65f4c85565955bab864529dd93fb4c59044e (plain)
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
32
33
34
35
36
37
38
39
https://github.com/jgm/skylighting/pull/154

From 00af1d629c2f185fd3c8d3eee55857b1325f345b Mon Sep 17 00:00:00 2001
From: matoro <matoro@users.noreply.github.com>
Date: Fri, 16 Sep 2022 10:30:35 -0400
Subject: [PATCH] Notch up core test timeout even further

On very slow/embedded cpus, 25 seconds is not sufficient (even 50
seconds is not); I had to notch the test timeout up to 75 seconds for
everything to pass.

This disables the test timeouts completely.
---
 test/test-skylighting.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/test/test-skylighting.hs b/test/test-skylighting.hs
index a3977e72..0f05e573 100644
--- a/test/test-skylighting.hs
+++ b/test/test-skylighting.hs
@@ -224,8 +224,7 @@ p_no_drop cfg syntax t =
 
 noDropTest :: TokenizerConfig -> [Text] -> Syntax -> TestTree
 noDropTest cfg inps syntax =
-  localOption (mkTimeout 25000000)
-  $ testCase (Text.unpack (sName syntax))
+  testCase (Text.unpack (sName syntax))
   $ mapM_ go inps
     where go inp =
               case tokenize cfg syntax inp of
@@ -238,7 +237,7 @@ noDropTest cfg inps syntax =
                       assertFailure ("Unexpected error: " ++ e ++ "\ninput = " ++ show inp)
 
 tokenizerTest :: TokenizerConfig -> SyntaxMap -> Bool -> FilePath -> TestTree
-tokenizerTest cfg sMap regen inpFile = localOption (mkTimeout 25000000) $
+tokenizerTest cfg sMap regen inpFile =
   goldenTest testname getExpected getActual
       (compareValues referenceFile) updateGolden
   where testname = lang ++ " tokenizing of " ++ inpFile