[Git][ghc/ghc][master] testsuite: Give the pre_cmd for mhu-perf more time

[Marge Bot (@marge-bot)]

Marge Bot pushed to branch master at Glasgow Haskell Compiler / GHC


Commits:
dba03aab by Matthew Craven at 2024-04-19T13:11:44-04:00
testsuite: Give the pre_cmd for mhu-perf more time

- - - - -


3 changed files:

- testsuite/driver/testglobals.py
- testsuite/driver/testlib.py
- testsuite/tests/driver/multipleHomeUnits/mhu-perf/all.T


Changes:

=====================================
testsuite/driver/testglobals.py
=====================================
@@ -448,6 +448,7 @@ class TestOptions:
        self.combined_output = False
 
        # How should the timeout be adjusted on this test?
+       self.pre_cmd_timeout_multiplier = 1.0
        self.compile_timeout_multiplier = 1.0
        self.run_timeout_multiplier = 1.0
 


=====================================
testsuite/driver/testlib.py
=====================================
@@ -559,6 +559,12 @@ def signal_exit_code( val: int ):
 
 # -----
 
+def pre_cmd_timeout_multiplier( val: float ):
+    return lambda name, opts, v=val: _pre_cmd_timeout_multiplier(name, opts, v)
+
+def _pre_cmd_timeout_multiplier( name, opts, v ):
+    opts.pre_cmd_timeout_multiplier = v
+
 def compile_timeout_multiplier( val: float ):
     return lambda name, opts, v=val: _compile_timeout_multiplier(name, opts, v)
 
@@ -1469,7 +1475,9 @@ async def do_test(name: TestName,
         exit_code = await runCmd('cd "{0}" && {1}'.format(opts.testdir, override_options(opts.pre_cmd)),
                            stdout = stdout_path,
                            stderr = stderr_path,
-                           print_output = config.verbose >= 3)
+                           print_output = config.verbose >= 3,
+                           timeout_multiplier = opts.pre_cmd_timeout_multiplier,
+                           )
 
         # If user used expect_broken then don't record failures of pre_cmd
         if exit_code != 0 and opts.expect not in ['fail']:


=====================================
testsuite/tests/driver/multipleHomeUnits/mhu-perf/all.T
=====================================
@@ -4,7 +4,8 @@ test('mhu-perf',
        pre_cmd('$MAKE -s --no-print-directory mhu-perf'),
        js_broken(22349),
        when(arch('wasm32'), skip), # wasm32 doesn't like running Setup/Makefile tests
-       compile_timeout_multiplier(5)
+       pre_cmd_timeout_multiplier(2),
+       compile_timeout_multiplier(5),
      ],
      multiunit_compile,
      [['unitTop1', 'unitTop2'], '-fhide-source-paths'])



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/dba03aababff057c03e2d92677de02d8375cd23a

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/dba03aababff057c03e2d92677de02d8375cd23a
You're receiving this email because of your account on gitlab.haskell.org.


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/ghc-commits/attachments/20240419/49cc3adb/attachment-0001.html>