[Git][ghc/ghc][wip/js-staging] Skip more tests

[Sylvain Henry (@hsyl20)]

Sylvain Henry pushed to branch wip/js-staging at Glasgow Haskell Compiler / GHC


Commits:
101c0025 by Sylvain Henry at 2022-10-06T16:49:35+02:00
Skip more tests

- - - - -


4 changed files:

- testsuite/tests/annotations/should_run/all.T
- testsuite/tests/concurrent/should_run/all.T
- testsuite/tests/showIface/should_fail/all.T
- testsuite/tests/typecheck/should_fail/all.T


Changes:

=====================================
testsuite/tests/annotations/should_run/all.T
=====================================
@@ -8,6 +8,7 @@ setTestOpts(when(fast(), skip))
 # config.ghc_th_way_flags.
 test('annrun01',
      [extra_files(['Annrun01_Help.hs']),
+      req_interp,
       pre_cmd('$MAKE -s --no-print-directory config'),
       omit_ways(['dyn'] + prof_ways)],
      multimod_compile_and_run,


=====================================
testsuite/tests/concurrent/should_run/all.T
=====================================
@@ -86,15 +86,20 @@ test('threadstatus-9333', [fragile_for(16555, ['ghci', 'profthreaded']), omit_wa
 
 test('T9379', normal, compile_and_run, [''])
 
-test('allocLimit1', exit_code(1), compile_and_run, [''])
-test('allocLimit2', normal, compile_and_run, [''])
+# Skip the allocLimit* tests with the JS backend as it doesn't support
+# setThreadAllocationCounter
+
+test('allocLimit1', [exit_code(1), js_skip], compile_and_run, [''])
+test('allocLimit2', js_skip, compile_and_run, [''])
 
 # The non-threaded RTS on Windows doesn't handle throwing exceptions at I/O
 # operations very well, and ends up duplicating the I/O, giving wrong results.
 test('allocLimit3', [ when(opsys('mingw32'), only_ways(threaded_ways)),
+                      js_skip,
                       exit_code(1) ], compile_and_run, [''])
 
 test('allocLimit4', [ extra_run_opts('+RTS -xq300k -RTS'),
+                      js_skip,
                       # ghci consumes part of set limit at startup
                       omit_ways(['ghci']) ],
                     compile_and_run, [''])


=====================================
testsuite/tests/showIface/should_fail/all.T
=====================================
@@ -1,9 +1,9 @@
 test('THPutDocExternal',
-     normal,
+     req_th,
      multimod_compile_fail,
      ['THPutDocExternal', '-no-hs-main -haddock -c -v0'])
 
 test('THPutDocNonExistent',
-     normal,
+     req_th,
      multimod_compile_fail,
      ['THPutDocNonExistent', '-no-hs-main -haddock -c -v0'])


=====================================
testsuite/tests/typecheck/should_fail/all.T
=====================================
@@ -441,7 +441,7 @@ test('T12837', normal, compile_fail, [''])
 test('T12906', normal, compile_fail, [''])
 test('T12918a', normal, compile_fail, [''])
 test('T12918b', normal, compile_fail, [''])
-test('T12921', normal, compile_fail, [''])
+test('T12921', req_interp, compile_fail, [''])
 test('T12947', normal, compile_fail, [''])
 test('StrictBinds', normal, compile_fail, [''])
 test('T13068', [extra_files(['T13068.hs', 'T13068a.hs', 'T13068.hs-boot', 'T13068m.hs'])], multimod_compile_fail, ['T13068m', ''])



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

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/101c002512211ce0acf7bb7229625e2eee46cd31
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/20221006/5422de92/attachment-0001.html>