[Git][ghc/ghc][wip/js-staging] 2 commits: Disable more tests

Sylvain Henry (@hsyl20) gitlab at gitlab.haskell.org
Thu Oct 6 13:41:01 UTC 2022



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


Commits:
02127fb6 by Sylvain Henry at 2022-10-06T15:17:47+02:00
Disable more tests

- - - - -
67e85d57 by Sylvain Henry at 2022-10-06T15:44:14+02:00
Disable more tests

- - - - -


9 changed files:

- testsuite/tests/perf/should_run/all.T
- testsuite/tests/perf/space_leaks/all.T
- testsuite/tests/rts/all.T
- testsuite/tests/saks/should_compile/all.T
- testsuite/tests/simplCore/should_compile/all.T
- testsuite/tests/tcplugins/all.T
- testsuite/tests/typecheck/should_compile/all.T
- testsuite/tests/typecheck/should_fail/all.T
- testsuite/tests/unboxedsums/all.T


Changes:

=====================================
testsuite/tests/perf/should_run/all.T
=====================================
@@ -1,3 +1,8 @@
+# disable performance tests for the JS backend
+# .stats files aren't generated and the expected allocation metrics (e.g. "bytes
+# allocated") can't be reported
+setTestOpts(js_skip)
+
 # T12791 and T5835 test that GHC uses top-level instances in places where using
 # a locally given solution would produce worse code.
 # See Note [Solving from instances when interacting Dicts]


=====================================
testsuite/tests/perf/space_leaks/all.T
=====================================
@@ -1,3 +1,4 @@
+setTestOpts(js_skip)
 
 test('space_leak_001',
      # This could potentially be replaced with


=====================================
testsuite/tests/rts/all.T
=====================================
@@ -97,6 +97,8 @@ test('outofmem', [ when(opsys('darwin'), skip),
                    # windows, to prevent absolute exhaustion of memory
                    # and subsequent termination (and failure) of unrelated
                    # tests.
+                   js_skip,
+                   # similarly for the JS backend
                    when(opsys('mingw32'), skip),
 		   normalise_errmsg_fun(remove_parenthesis)],
                  makefile_test, ['outofmem'])


=====================================
testsuite/tests/saks/should_compile/all.T
=====================================
@@ -43,6 +43,6 @@ test('T16756a', normal, compile, [''])
 #       (1) Use -fexternal-interpreter, or
 #       (2) Build the program twice: once with -dynamic, and then
 #           with -prof using -osuf to set a different object file suffix.
-test('saks027', omit_ways(['profasm']), compile, ['-v0 -ddump-splices -dsuppress-uniques'])
-test('saks028', omit_ways(['profasm']), compile, [''])
-test('T17164', omit_ways(['profasm']), compile, ['-v0 -ddump-splices -dsuppress-uniques'])
+test('saks027', [req_th,omit_ways(['profasm'])], compile, ['-v0 -ddump-splices -dsuppress-uniques'])
+test('saks028', [req_th,omit_ways(['profasm'])], compile, [''])
+test('T17164', [req_th,omit_ways(['profasm'])], compile, ['-v0 -ddump-splices -dsuppress-uniques'])


=====================================
testsuite/tests/simplCore/should_compile/all.T
=====================================
@@ -134,7 +134,7 @@ test('T5366',
      normal,
      makefile_test, ['T5366'])
 test('T7796', [], makefile_test, ['T7796'])
-test('T5550', omit_ways(prof_ways), compile, [''])
+test('T5550', [req_interp,omit_ways(prof_ways)], compile, [''])
 test('T7865', normal, makefile_test, ['T7865'])
 
 # T7785: we want to check that we specialise 'shared'. But Tidy discards the
@@ -347,7 +347,7 @@ test('T18747B', normal, compile, [''])
 test('T18815', only_ways(['optasm']), makefile_test, ['T18815'])
 test('T18668', normal, compile, ['-dsuppress-uniques'])
 test('T18995', [ grep_errmsg(r'print') ], compile, ['-O -ddump-simpl -dsuppress-uniques'])
-test('T19168', normal, compile, [''])
+test('T19168', req_interp, compile, [''])
 test('T19246', only_ways(['optasm']), multimod_compile, ['T19246', '-v0 -ddump-rules'])
 test('T19360', only_ways(['optasm']), compile, [''])
 
@@ -394,7 +394,7 @@ test('OpaqueNoCastWW', normal, compile, ['-O -ddump-simpl -dsuppress-uniques'])
 test('OpaqueNoRebox', normal, compile, ['-O -ddump-simpl -dsuppress-uniques'])
 test('OpaqueNoRebox2', normal, compile, ['-O -ddump-simpl -dsuppress-uniques'])
 test('OpaqueNoRebox3', normal, compile, ['-O -ddump-simpl -dsuppress-uniques'])
-test('OpaqueNoSpecConstr', normal, compile, ['-O -ddump-simpl -dsuppress-uniques'])
+test('OpaqueNoSpecConstr', req_interp, compile, ['-O -ddump-simpl -dsuppress-uniques'])
 test('OpaqueNoSpecialise', normal, compile, ['-O -ddump-simpl -dsuppress-uniques'])
 test('OpaqueNoStrictArgWW', normal, compile, ['-O -fworker-wrapper-cbv -ddump-simpl -dsuppress-uniques'])
 test('OpaqueNoWW', normal, compile, ['-O -ddump-simpl -dsuppress-uniques'])


=====================================
testsuite/tests/tcplugins/all.T
=====================================
@@ -1,3 +1,4 @@
+setTestOpts(js_broken(22261))
 
 # See NullaryPlugin.hs for a description of this plugin.
 test('TcPlugin_Nullary'


=====================================
testsuite/tests/typecheck/should_compile/all.T
=====================================
@@ -490,7 +490,7 @@ test('T10592', normal, compile, [''])
 test('T11305', normal, compile, [''])
 test('T11254', normal, compile, [''])
 test('T11379', normal, compile, [''])
-test('T11462', normal, multi_compile,
+test('T11462', js_broken(22261), multi_compile,
      [None, [('T11462_Plugin.hs', '-package ghc'), ('T11462.hs', '')],
       '-dynamic' if have_dynamic() else ''])
 test('T11480', normal, compile, [''])
@@ -558,7 +558,7 @@ test('T11723', normal, compile, [''])
 test('T12987', normal, compile, [''])
 test('T11736', normal, compile, [''])
 test('T13248', expect_broken(13248), compile, [''])
-test('T11525', normal, multi_compile,
+test('T11525', js_broken(22261), multi_compile,
      [None, [('T11525_Plugin.hs', '-package ghc'), ('T11525.hs', '')],
       '-dynamic' if have_dynamic() else ''])
 test('T12923_1', normal, compile, [''])
@@ -632,7 +632,7 @@ test('SplitWD', normal, compile, [''])
 #       (1) Use -fexternal-interpreter, or
 #       (2) Build the program twice: once with -dynamic, and then
 #           with -prof using -osuf to set a different object file suffix.
-test('T14441', omit_ways(['profasm']), compile, [''])
+test('T14441', [js_broken(22261),omit_ways(['profasm'])], compile, [''])
 test('T15079', normal, compile, [''])
 test('T15050', normal, compile, [''])
 test('T14735', normal, compile, [''])


=====================================
testsuite/tests/typecheck/should_fail/all.T
=====================================
@@ -497,7 +497,7 @@ test('T15552a', normal, compile_fail, [''])
 test('T15592a', normal, compile_fail, [''])
 test('T15629', normal, compile_fail, [''])
 test('T15767', normal, compile_fail, [''])
-test('T15648', [extra_files(['T15648a.hs'])], multimod_compile_fail, ['T15648', '-v0 -fprint-equality-relations'])
+test('T15648', [req_th,extra_files(['T15648a.hs'])], multimod_compile_fail, ['T15648', '-v0 -fprint-equality-relations'])
 test('T15712', normal, compile_fail, [''])
 test('T15793', normal, compile_fail, [''])
 test('T15796', normal, compile_fail, [''])


=====================================
testsuite/tests/unboxedsums/all.T
=====================================
@@ -17,8 +17,8 @@ test('unboxedsums10', omit_ways(['ghci']), compile_and_run, [''])
 test('unboxedsums11', omit_ways(['ghci']), compile_and_run, [''])
 test('unboxedsums12', omit_ways(['ghci']), compile, [''])
 
-test('UnboxedSumsTH', omit_ways(['ghci']), compile, [''])
-test('UnboxedSumsTH_Fail', omit_ways(['ghci']), compile_fail, [''])
+test('UnboxedSumsTH', [req_th,omit_ways(['ghci'])], compile, [''])
+test('UnboxedSumsTH_Fail', [req_th,omit_ways(['ghci'])], compile_fail, [''])
 
 test('ffi1', normal, compile_fail, [''])
 test('thunk', only_ways(['normal']), compile_and_run, [''])



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/compare/c24c6ad3e2493cea9f502af34314cdd147ee2c38...67e85d572bb0c5423039e4dbe9674284df167d45

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/compare/c24c6ad3e2493cea9f502af34314cdd147ee2c38...67e85d572bb0c5423039e4dbe9674284df167d45
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/4d6d2e5a/attachment-0001.html>


More information about the ghc-commits mailing list