[Git][ghc/ghc][wip/js-staging] 11 commits: testsuite: skip recomp4, 8 on JS backend

doyougnu (@doyougnu) gitlab at gitlab.haskell.org
Wed Oct 19 21:39:44 UTC 2022



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


Commits:
48e7a0f2 by doyougnu at 2022-10-19T16:01:28-04:00
testsuite: skip recomp4,8 on JS backend

- - - - -
636ff1f4 by doyougnu at 2022-10-19T16:07:39-04:00
testsuite: skip alloccounter1 and T19156 for JS

These tests fail due to missing primops

- - - - -
0b391b34 by doyougnu at 2022-10-19T16:50:02-04:00
testsuite: skip T7773 and topHandler01 for JS

- - - - -
10541276 by doyougnu at 2022-10-19T17:00:31-04:00
testsuite: skip rdynamic and T2615 for JS Backend

- - - - -
8f71711c by doyougnu at 2022-10-19T17:04:43-04:00
testsuite: skip T4012 for JS backend

- - - - -
9eda6042 by doyougnu at 2022-10-19T17:07:27-04:00
testsuite: skip T15427 for JS backend

- - - - -
db49939d by doyougnu at 2022-10-19T17:10:21-04:00
testsuite: skip T19481, T19381, T3474 for JS

- - - - -
4f271817 by doyougnu at 2022-10-19T17:14:03-04:00
testsuite: skip stack004 for JS backend

- - - - -
e8d27748 by doyougnu at 2022-10-19T17:24:08-04:00
testsuite: JS skip ThreadDelay001 and encoding004

- - - - -
ec59d4bb by doyougnu at 2022-10-19T17:27:13-04:00
testsuite: skip openFile003 for JS backend

- - - - -
607a78fa by doyougnu at 2022-10-19T17:37:36-04:00
testsuite: disable T1959 and capi tests for JS

- - - - -


10 changed files:

- libraries/base/tests/Concurrent/all.T
- libraries/base/tests/IO/all.T
- libraries/base/tests/all.T
- testsuite/tests/driver/T1959/test.T
- testsuite/tests/driver/recomp004/all.T
- testsuite/tests/driver/recomp008/all.T
- testsuite/tests/ffi/should_run/all.T
- testsuite/tests/ghc-api/all.T
- testsuite/tests/rts/all.T
- testsuite/tests/rts/linker/all.T


Changes:

=====================================
libraries/base/tests/Concurrent/all.T
=====================================
@@ -1,3 +1,3 @@
 test('Chan002',      extra_run_opts('100'), compile_and_run, [''])
 test('Chan003',      extra_run_opts('200'), compile_and_run, [''])
-test('ThreadDelay001', normal, compile_and_run, [''])
+test('ThreadDelay001', js_skip, compile_and_run, [''])


=====================================
libraries/base/tests/IO/all.T
=====================================
@@ -61,7 +61,7 @@ test('misc001', [extra_run_opts('misc001.hs misc001.out')], compile_and_run,
 
 test('openFile001',  normal, compile_and_run, [''])
 test('openFile002',  [exit_code(1), normalise_win32_io_errors], compile_and_run, [''])
-test('openFile003', [normalise_win32_io_errors], compile_and_run, [''])
+test('openFile003', [normalise_win32_io_errors, js_skip], compile_and_run, [''])
 test('openFile004', [], compile_and_run, [''])
 test('openFile005', [], compile_and_run, [''])
 test('openFile006', [], compile_and_run, [''])
@@ -115,7 +115,7 @@ test('encoding001', [], compile_and_run, [''])
 
 test('encoding002', normal, compile_and_run, [''])
 test('encoding003', normal, compile_and_run, [''])
-test('encoding004', extra_files(['encoded-data/']), compile_and_run, [''])
+test('encoding004', [extra_files(['encoded-data/']), js_skip], compile_and_run, [''])
 test('encoding005', normal, compile_and_run, [''])
 
 test('environment001', [], makefile_test, ['environment001-test'])


=====================================
libraries/base/tests/all.T
=====================================
@@ -167,7 +167,7 @@ test('qsemn001', normal, compile_and_run, [''])
 
 test('T7457', normal, compile_and_run, [''])
 
-test('T7773', when(opsys('mingw32'), skip), compile_and_run, [''])
+test('T7773', [when(opsys('mingw32'), skip), js_skip], compile_and_run, [''])
 # Andreas says that T7773 will not (and should not) work on Windows
 
 # Tests for kind-polymorphic Category
@@ -179,7 +179,7 @@ test('T7653', [when(opsys('mingw32'), skip),
                omit_ways(prof_ways+['ghci'])], compile_and_run, [''])
 test('T7787', normal, compile_and_run, [''])
 
-test('topHandler01', when(opsys('mingw32'), skip), compile_and_run, [''])
+test('topHandler01', [when(opsys('mingw32'), skip), js_skip], compile_and_run, [''])
 test('topHandler02',
      [when(opsys('mingw32'), skip),
       omit_ways(['ghci']),
@@ -246,6 +246,7 @@ test('T13097', normal, compile_and_run, [''])
 test('functorOperators', normal, compile_and_run, [''])
 test('T3474',
      [collect_stats('max_bytes_used',5),
+      js_skip,
       only_ways(['normal'])],
      compile_and_run, ['-O'])
 test('T14425', normal, compile_and_run, [''])


=====================================
testsuite/tests/driver/T1959/test.T
=====================================
@@ -1 +1 @@
-test('T1959', [extra_files(['B.hs', 'C.hs', 'D.hs', 'E1.hs', 'E2.hs'])], makefile_test, ['dotest'])
+test('T1959', [extra_files(['B.hs', 'C.hs', 'D.hs', 'E1.hs', 'E2.hs']), js_skip], makefile_test, ['dotest'])


=====================================
testsuite/tests/driver/recomp004/all.T
=====================================
@@ -1,2 +1,2 @@
-test('recomp004', [extra_files(['Main.hs', 'c.h', 'c1.c', 'c2.c'])],
+test('recomp004', [extra_files(['Main.hs', 'c.h', 'c1.c', 'c2.c']), js_skip],
      makefile_test, [])


=====================================
testsuite/tests/driver/recomp008/all.T
=====================================
@@ -1,6 +1,8 @@
 # Test for #4469, a recompilation bug related to instances
 
 test('recomp008',
-     [extra_files(['A1.hs', 'A2.hs', 'B.hs', 'Main.hs']),
-      when(fast(), skip), normalise_slashes],
+     [extra_files(['A1.hs', 'A2.hs', 'B.hs', 'Main.hs'])
+      , when(fast(), skip)
+      , normalise_slashes
+      , js_skip],
      makefile_test, [])


=====================================
testsuite/tests/ffi/should_run/all.T
=====================================
@@ -166,23 +166,23 @@ test('T5594', [ omit_ways(['ghci']),
                 # needs it.
                 compile_and_run, ['T5594_c.c -no-hs-main'])
 
-test('Capi_Ctype_001', [extra_files(['Capi_Ctype_A_001.hsc', 'capi_ctype_001.h', 'capi_ctype_001_c.c'])],
+test('Capi_Ctype_001', [extra_files(['Capi_Ctype_A_001.hsc', 'capi_ctype_001.h', 'capi_ctype_001_c.c']), js_skip],
      makefile_test, ['Capi_Ctype_001'])
 
-test('Capi_Ctype_002', [extra_files(['Capi_Ctype_A_002.hsc', 'capi_ctype_002_A.h', 'capi_ctype_002_B.h'])],
+test('Capi_Ctype_002', [extra_files(['Capi_Ctype_A_002.hsc', 'capi_ctype_002_A.h', 'capi_ctype_002_B.h']), js_skip],
      makefile_test, ['Capi_Ctype_002'])
 
 test('ffi_parsing_001', [omit_ways(['ghci']), c_src], compile_and_run,
      ['ffi_parsing_001_c.c'])
 
-test('capi_value', [omit_ways(['ghci'])], compile_and_run, ['capi_value_c.c'])
+test('capi_value', [omit_ways(['ghci']), js_skip], compile_and_run, ['capi_value_c.c'])
 
 test('T7170',
      [when(opsys('mingw32'), fragile(16801)),
       exit_code(1)],
      compile_and_run, [''])
 
-test('T4012', [expect_broken_for(7388, ['ghci'])], multimod_compile_and_run,
+test('T4012', [expect_broken_for(7388, ['ghci']), js_skip], multimod_compile_and_run,
      ['T4012', ''])
 
 test('T8083', [omit_ways(['ghci']), c_src], compile_and_run, ['T8083_c.c'])


=====================================
testsuite/tests/ghc-api/all.T
=====================================
@@ -30,6 +30,7 @@ test('T18522-dbg-ppr',
   compile_and_run,
   ['-package ghc'])
 test('T19156', extra_run_opts('"' + config.libdir + '"'),
+               js_skip,
                compile_and_run,
                ['-package ghc'])
 test('T20757', [unless(opsys('mingw32'), skip), exit_code(1)],


=====================================
testsuite/tests/rts/all.T
=====================================
@@ -141,6 +141,7 @@ test('stack003', [ omit_ways(['ghci']), # uses unboxed tuples
 
 # Test that +RTS -K0 (e.g. no stack limit) parses correctly
 test('stack004', [ extra_run_opts('+RTS -K0 -RTS')
+                 , js_skip
                  , expect_broken_for(14913, ['ghci'])
                  ], compile_and_run, [''])
 
@@ -432,7 +433,7 @@ test('T14900',
 test('InternalCounters',
   [ js_skip # JS backend doesn't support internal counters
   ], makefile_test, ['InternalCounters'])
-test('alloccounter1', normal, compile_and_run,
+test('alloccounter1', js_skip, compile_and_run,
   [
     # avoid allocating stack chunks, which counts as
     # allocation and messes up the results:
@@ -498,15 +499,17 @@ test('T17088',
      [only_ways(['normal']), extra_run_opts('+RTS -c -A256k -RTS')],
      compile_and_run, ['-rtsopts -O2'])
 
-test('T15427', normal, compile_and_run, [''])
+test('T15427', js_skip, compile_and_run, [''])
 
 test('T19481',
      [extra_run_opts('+RTS -T -RTS'),
+      js_skip,
       # memory behavior changes appreciably with the nonmoving collector
       omit_ways(['nonmoving', 'nonmoving_thr', 'nonmoving_thr_sanity'])],
      compile_and_run, [''])
 test('T19381',
      [extra_run_opts('+RTS -T -RTS'),
+      js_skip,
       # memory behavior changes appreciably with the nonmoving collector
       omit_ways(['nonmoving', 'nonmoving_thr', 'nonmoving_thr_sanity'])],
      compile_and_run, [''])


=====================================
testsuite/tests/rts/linker/all.T
=====================================
@@ -20,6 +20,7 @@ test('section_alignment',
 # Test to see if linker scripts link properly to real ELF files
 test('T2615',
      [extra_files(['libfoo_T2615.c', 'libfoo_script_T2615.so']),
+       js_skip,
        when(opsys('mingw32'), skip),
        # OS X doesn't seem to support linker scripts
        when(opsys('darwin'), skip),
@@ -114,6 +115,7 @@ test('rdynamic', [ unless(opsys('linux') or opsys('mingw32'), skip)
                  # this needs runtime infrastructure to do in ghci:
                  #  '-rdynamic' ghc, load modules only via dlopen(RTLD_BLOBAL) and more.
                  , omit_ways(['ghci'])
+                 , js_skip
                  ],
      compile_and_run, ['-rdynamic -package ghc'])
 



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/compare/afb397e9edd5445a3ffe48b523f620b7690cf156...607a78faae332a23cd313b150a3e598e13c10add

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/compare/afb397e9edd5445a3ffe48b523f620b7690cf156...607a78faae332a23cd313b150a3e598e13c10add
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/20221019/82bfc0f7/attachment-0001.html>


More information about the ghc-commits mailing list