[Git][ghc/ghc][wip/js-staging] testsuite: mark more tests as broken for JS

doyougnu (@doyougnu) gitlab at gitlab.haskell.org
Fri Oct 28 13:25:19 UTC 2022



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


Commits:
f913e55d by doyougnu at 2022-10-28T09:23:40-04:00
testsuite: mark more tests as broken for JS

Specifically tests which throw reference errors:

hReady001
hReady002
readwrite002
fed001
Capi_Ctype_001
Capi_Ctype_002
T7037

Tracking ticket: https://gitlab.haskell.org/ghc/ghc/-/issues/22374

- - - - -


3 changed files:

- libraries/base/tests/IO/all.T
- testsuite/tests/ffi/should_run/all.T
- testsuite/tests/rts/all.T


Changes:

=====================================
libraries/base/tests/IO/all.T
=====================================
@@ -28,14 +28,14 @@ test('hGetPosn001', [], compile_and_run, ['-cpp'])
 test('hIsEOF001',   normal, compile_and_run, [''])
 test('hIsEOF002', [], compile_and_run, ['-cpp'])
 
-test('hReady001', js_skip, compile_and_run, ['-cpp'])
+test('hReady001', js_broken(22374), compile_and_run, ['-cpp'])
 
 # hReady002 tests that hReady returns False for a pipe that has no
 # data to read.  It relies on piping input from 'sleep 1', which doesn't
 # work for the 'ghci' way because in that case we already pipe input from
 # a script, so hence omit_ways(['ghci'])
 test('hReady002', [cmd_prefix('sleep 1 |'), omit_ways(['ghci']),
-                   multi_cpu_race, js_skip],
+                   multi_cpu_race, js_broken(22374)],
      compile_and_run, [''])
 
 test('hSeek001', normal, compile_and_run, [''])
@@ -77,7 +77,7 @@ test('readFile001', js_broken(22261), compile_and_run, [''])
 test('readwrite001', [], compile_and_run, ['-cpp'])
 
 
-test('readwrite002', [omit_ways(['ghci']), set_stdin('readwrite002.hs'), js_skip],
+test('readwrite002', [omit_ways(['ghci']), set_stdin('readwrite002.hs'), js_broken(22374)],
      compile_and_run, ['-cpp'])
 
 test('readwrite003', [], compile_and_run, [''])


=====================================
testsuite/tests/ffi/should_run/all.T
=====================================
@@ -4,7 +4,7 @@
 #	extra run flags
 #	expected process return value, if not zero
 
-test( 'fed001', js_skip # qsort not yet implemented in JavaScript backend
+test( 'fed001', js_broken(22374) # qsort not yet implemented in JavaScript backend
     , compile_and_run, [''])
 
 # Omit GHCi for these two, as they use foreign export
@@ -167,10 +167,10 @@ test('T5594', [ omit_ways(['ghci']),
               ],
                 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']), js_skip],
+test('Capi_Ctype_001', [extra_files(['Capi_Ctype_A_001.hsc', 'capi_ctype_001.h', 'capi_ctype_001_c.c']), js_broken(22374)],
      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']), js_skip],
+test('Capi_Ctype_002', [extra_files(['Capi_Ctype_A_002.hsc', 'capi_ctype_002_A.h', 'capi_ctype_002_B.h']), js_broken(22374)],
      makefile_test, ['Capi_Ctype_002'])
 
 test('ffi_parsing_001', [omit_ways(['ghci']), req_c], compile_and_run,


=====================================
testsuite/tests/rts/all.T
=====================================
@@ -258,7 +258,7 @@ test('T6006', [ omit_ways(prof_ways + ['ghci']),
                  # needs it.
                compile_and_run, ['T6006_c.c -no-hs-main'])
 
-test('T7037', js_skip, makefile_test, ['T7037'])
+test('T7037', js_broken(22374), makefile_test, ['T7037'])
 
 test('T7087', exit_code(1), compile_and_run, [''])
 test('T7160', [ omit_ways(['nonmoving_thr', 'nonmoving_thr_ghc'])



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

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/f913e55d3f49fb47d92279b952a3c4b3780fb43c
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/20221028/c969d2fa/attachment-0001.html>


More information about the ghc-commits mailing list