[Git][ghc/ghc][wip/js-staging] testsuite: req_c -> req_js_c

doyougnu (@doyougnu) gitlab at gitlab.haskell.org
Wed Oct 26 18:13:58 UTC 2022



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


Commits:
f302c03b by doyougnu at 2022-10-26T14:12:07-04:00
testsuite: req_c -> req_js_c

Also js_skip -> req_js_c for tests that were incorrectly marked.

Tracking ticket: #22367

- - - - -


17 changed files:

- testsuite/driver/testlib.py
- testsuite/tests/backpack/should_run/all.T
- testsuite/tests/codeGen/should_run/T20137/all.T
- testsuite/tests/codeGen/should_run/T20735/all.T
- testsuite/tests/codeGen/should_run/all.T
- testsuite/tests/driver/T12674/all.T
- testsuite/tests/driver/multipleHomeUnits/o-dir/all.T
- testsuite/tests/driver/recomp004/all.T
- testsuite/tests/ffi/should_fail/all.T
- testsuite/tests/ffi/should_run/all.T
- testsuite/tests/generics/all.T
- testsuite/tests/ghci/linking/all.T
- testsuite/tests/ghci/linking/dyn/all.T
- testsuite/tests/package/T20010/all.T
- testsuite/tests/rep-poly/all.T
- testsuite/tests/rts/all.T
- testsuite/tests/rts/linker/T11223/all.T


Changes:

=====================================
testsuite/driver/testlib.py
=====================================
@@ -271,7 +271,7 @@ def req_rts_linker( name, opts ):
     # JS backend doesn't provide the RTS linker
     js_skip(name, opts)
 
-def req_c( name, opts ):
+def req_js_c( name, opts ):
     """
     Mark a test as requiring C source file support
     """


=====================================
testsuite/tests/backpack/should_run/all.T
=====================================
@@ -1,13 +1,13 @@
-test('bkprun01', req_c, backpack_run, [''])
-test('bkprun02', req_c, backpack_run, [''])
-test('bkprun03', req_c, backpack_run, [''])
-test('bkprun04', req_c, backpack_run, [''])
-test('bkprun05', [exit_code(1), req_c], backpack_run, [''])
-test('bkprun06', req_c, backpack_run, [''])
-test('bkprun07', req_c, backpack_run, [''])
-test('bkprun08', req_c, backpack_run, [''])
-test('bkprun09', req_c, backpack_run, ['-O'])
-test('T13955', req_c, backpack_run, [''])
-test('T15138', req_c, backpack_run, [''])
-test('T15379', req_c, backpack_run,[''])
+test('bkprun01', req_js_c, backpack_run, [''])
+test('bkprun02', req_js_c, backpack_run, [''])
+test('bkprun03', req_js_c, backpack_run, [''])
+test('bkprun04', req_js_c, backpack_run, [''])
+test('bkprun05', [exit_code(1), req_js_c], backpack_run, [''])
+test('bkprun06', req_js_c, backpack_run, [''])
+test('bkprun07', req_js_c, backpack_run, [''])
+test('bkprun08', req_js_c, backpack_run, [''])
+test('bkprun09', req_js_c, backpack_run, ['-O'])
+test('T13955', req_js_c, backpack_run, [''])
+test('T15138', req_js_c, backpack_run, [''])
+test('T15379', req_js_c, backpack_run,[''])
 test('T20133', expect_broken(20133), backpack_run, [''])


=====================================
testsuite/tests/codeGen/should_run/T20137/all.T
=====================================
@@ -1 +1 @@
-test('T20137', req_c, compile_and_run, ['T20137C.c'])
+test('T20137', req_js_c, compile_and_run, ['T20137C.c'])


=====================================
testsuite/tests/codeGen/should_run/T20735/all.T
=====================================
@@ -1,5 +1,5 @@
 test('T20735',
-     req_c,
+     req_js_c,
      multi_compile_and_run,
      ['T20735', [('T20735_c.c', '')], ''])
 


=====================================
testsuite/tests/codeGen/should_run/all.T
=====================================
@@ -213,7 +213,7 @@ test('T16449_2', exit_code(0), compile_and_run, [''])
 test('T16846', [only_ways(['optasm']), exit_code(1)], compile_and_run, [''])
 
 test('T17920', cmm_src, compile_and_run, [''])
-test('T18527', req_c, compile_and_run, ['T18527FFI.c'])
+test('T18527', req_js_c, compile_and_run, ['T18527FFI.c'])
 test('T19149', only_ways('sanity'), compile_and_run, ['T19149_c.c'])
 test('T20275', normal, compile_and_run, [''])
 


=====================================
testsuite/tests/driver/T12674/all.T
=====================================
@@ -1,10 +1,10 @@
 test('T12674', [extra_files(['-T12674.hs', '-T12674c.c']),
                 when(opsys('darwin') and arch('aarch64'), skip),
-                js_skip # require support for C sources
+                req_js_c # require support for C sources
                 ],
                 makefile_test, [])
 test('T12674w', [extra_files(['-T12674.hs', '-T12674c.c']),
                 unless(opsys('mingw32'), skip),
-                js_skip # require support for C sources
+                req_js_c # require support for C sources
                 ],
                 makefile_test, [])


=====================================
testsuite/tests/driver/multipleHomeUnits/o-dir/all.T
=====================================
@@ -1,7 +1,7 @@
 # This test checks that getRootSummary doesn't cross package boundaries.
 test('multipleHomeUnits_odir'
     , [ extra_files([ 'p1/', 'unitP1'])
-      , req_c
+      , req_js_c
       ]
     , makefile_test
     , ['mhu-odir'])


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


=====================================
testsuite/tests/ffi/should_fail/all.T
=====================================
@@ -9,7 +9,7 @@ test('T3066', normal, compile_fail, [''])
 test('ccfail004', [extra_files(['Ccfail004A.hs'])], multimod_compile_fail, ['ccfail004', '-v0'])
 test('ccfail005', normal, compile_fail, [''])
 test('ccall_value', normal, compile_fail, [''])
-test('capi_value_function', req_c, compile_fail, [''])
+test('capi_value_function', req_js_c, compile_fail, [''])
 test('NonreducingFfiSignature', normal, compile_fail, [''])
 test('T5664', normal, compile_fail, ['-v0'])
 test('T7506', normal, compile_fail, [''])
@@ -25,7 +25,7 @@ test('T21305_fail', normal, compile_fail, [''])
 test('UnsafeReenter',
      [ omit_ways(threaded_ways)
      , exit_code(1)
-     , req_c
+     , req_js_c
      ],
      compile_and_run,
      ['UnsafeReenterC.c'])


=====================================
testsuite/tests/ffi/should_run/all.T
=====================================
@@ -34,7 +34,7 @@ test('ffi004', skip, compile_and_run, [''])
 test('ffi005', [ omit_ways(prof_ways + ['ghci']),
                  when(arch('i386'), skip),
                  when(platform('i386-apple-darwin'), expect_broken(4105)),
-                 req_c,
+                 req_js_c,
                  exit_code(3) ],
                compile_and_run, ['ffi005_c.c'])
 
@@ -79,7 +79,7 @@ test('ffi014', [only_ways(['threaded1', 'threaded2'])], compile_and_run,
      ['ffi014_cbits.c'])
 
 # GHCi can't handle the separate C file (ToDo: fix this somehow)
-test('ffi015', [omit_ways(['ghci']), req_c], compile_and_run, ['ffi015_cbits.c'])
+test('ffi015', [omit_ways(['ghci']), req_js_c], compile_and_run, ['ffi015_cbits.c'])
 
 # GHCi can't handle foreign import "&"
 test('ffi016', [ omit_ways(['ghci'])
@@ -95,7 +95,7 @@ test('ffi018_ghci',
       only_ways(['ghci']),
       when(unregisterised(), fragile(16085)),
       pre_cmd('$MAKE -s --no-print-directory ffi018_ghci_setup'),
-      req_c],
+      req_js_c],
      compile_and_run, ['ffi018_ghci_c.o'])
 
 test('ffi019', [normal, js_broken(22363)], compile_and_run, [''])
@@ -103,14 +103,14 @@ test('ffi019', [normal, js_broken(22363)], compile_and_run, [''])
 # This one originally failed only GHCi, but doesn't hurt to test all ways.
 test('T1679', js_skip, compile_and_run, [''])
 
-test('T1288', [omit_ways(['ghci']), req_c], compile_and_run, ['T1288_c.c'])
+test('T1288', [omit_ways(['ghci']), req_js_c], compile_and_run, ['T1288_c.c'])
 test('T1288_ghci',
      [only_ways(['ghci']),
       when(unregisterised(), fragile(16085)),
       pre_cmd('$MAKE -s --no-print-directory T1288_ghci_setup')],
      compile_and_run, ['T1288_ghci_c.o'])
 
-test('T2276', [omit_ways(['ghci']), req_c], compile_and_run, ['T2276_c.c'])
+test('T2276', [omit_ways(['ghci']), req_js_c], compile_and_run, ['T2276_c.c'])
 test('T2276_ghci', [ only_ways(['ghci']),
                      when(opsys('darwin'), skip), # stdcall not supported on OS X
                      pre_cmd('$MAKE -s --no-print-directory T2276_ghci_setup') ],
@@ -118,7 +118,7 @@ test('T2276_ghci', [ only_ways(['ghci']),
 
 test('T2469', js_skip, compile_and_run, ['-optc-std=gnu99'])
 
-test('T2594', [omit_ways(['ghci']), req_c], compile_and_run, ['T2594_c.c'])
+test('T2594', [omit_ways(['ghci']), req_js_c], compile_and_run, ['T2594_c.c'])
 
 test('fptr01', [omit_ways(['ghci']), js_skip], compile_and_run,
       [ 'fptr01_js.js' if arch("js") else 'fptr01_c.c'])
@@ -126,7 +126,7 @@ test('fptr02', normal, compile_and_run, [''])
 
 test('fptrfail01', [omit_ways(['ghci']),
                    exit_code(1),
-                   req_c], compile_and_run,
+                   req_js_c], compile_and_run,
      ['fptrfail01_c.c'])
 
 test('T2917a', normal, compile_and_run, [''])
@@ -149,7 +149,7 @@ else:
 	flagsForT4038 = ['']
 test('T4038', js_skip, compile_and_run, flagsForT4038)
 
-test('T4221', [omit_ways(['ghci']), req_c], compile_and_run, ['T4221_c.c'])
+test('T4221', [omit_ways(['ghci']), req_js_c], compile_and_run, ['T4221_c.c'])
 
 test('T5402', [ omit_ways(['ghci']),
                 exit_code(42),
@@ -157,7 +157,7 @@ test('T5402', [ omit_ways(['ghci']),
                   # T5402_stub.h before compiling T5402_main.c, which
                   # needs it.
                 pre_cmd('$MAKE -s --no-print-directory T5402_setup'),
-                req_c
+                req_js_c
               ],
               compile_and_run, ["-no-hs-main T5402_main.c"])
 
@@ -166,7 +166,7 @@ test('T5594', [ omit_ways(['ghci']),
                 # The T5594_setup hack is to ensure that we generate
                 # T5594_stub.h before compiling T5594_c.c, which
                 # needs it.
-                req_c
+                req_js_c
               ],
                 compile_and_run, ['T5594_c.c -no-hs-main'])
 
@@ -176,7 +176,7 @@ test('Capi_Ctype_001', [extra_files(['Capi_Ctype_A_001.hsc', 'capi_ctype_001.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']), req_c], compile_and_run,
+test('ffi_parsing_001', [omit_ways(['ghci']), req_js_c], compile_and_run,
      ['ffi_parsing_001_c.c'])
 
 test('capi_value', [omit_ways(['ghci']), js_skip], compile_and_run, ['capi_value_c.c'])
@@ -189,7 +189,7 @@ test('T7170',
 test('T4012', [expect_broken_for(7388, ['ghci']), js_skip], multimod_compile_and_run,
      ['T4012', ''])
 
-test('T8083', [omit_ways(['ghci']), req_c], compile_and_run, ['T8083_c.c'])
+test('T8083', [omit_ways(['ghci']), req_js_c], compile_and_run, ['T8083_c.c'])
 
 test('T9274', [omit_ways(['ghci'])], compile_and_run, [''])
 
@@ -202,39 +202,39 @@ test('ffi023', [ omit_ways(['ghci']),
                 # needs it.
               compile_and_run, ['ffi023_c.c'])
 
-test('T12134', [omit_ways(['ghci']),req_c], compile_and_run, ['T12134_c.c'])
+test('T12134', [omit_ways(['ghci']),req_js_c], compile_and_run, ['T12134_c.c'])
 
-test('T12614', [omit_ways(['ghci']),req_c], compile_and_run, ['T12614_c.c'])
+test('T12614', [omit_ways(['ghci']),req_js_c], compile_and_run, ['T12614_c.c'])
 
-test('T14624', [omit_ways(['ghci']), req_c], compile_and_run, ['T14624_c.c'])
+test('T14624', [omit_ways(['ghci']), req_js_c], compile_and_run, ['T14624_c.c'])
 
-test('T15933', [extra_files(['T15933_c.c', 'T15933.h']), req_c], makefile_test, ['T15933'])
+test('T15933', [extra_files(['T15933_c.c', 'T15933.h']), req_js_c], makefile_test, ['T15933'])
 
-test('T16650a', [omit_ways(['ghci']), req_c], compile_and_run, ['T16650a_c.c'])
+test('T16650a', [omit_ways(['ghci']), req_js_c], compile_and_run, ['T16650a_c.c'])
 
-test('T16650b', [omit_ways(['ghci']), req_c], compile_and_run, ['T16650b_c.c'])
+test('T16650b', [omit_ways(['ghci']), req_js_c], compile_and_run, ['T16650b_c.c'])
 
-test('T16650c', [omit_ways(['ghci']), req_c], compile_and_run, ['T16650c_c.c'])
+test('T16650c', [omit_ways(['ghci']), req_js_c], compile_and_run, ['T16650c_c.c'])
 
-test('T16650d', [omit_ways(['ghci']), req_c], compile_and_run, ['T16650d_c.c'])
+test('T16650d', [omit_ways(['ghci']), req_js_c], compile_and_run, ['T16650d_c.c'])
 
-test('PrimFFIInt8', [omit_ways(['ghci']), req_c], compile_and_run, ['PrimFFIInt8_c.c'])
+test('PrimFFIInt8', [omit_ways(['ghci']), req_js_c], compile_and_run, ['PrimFFIInt8_c.c'])
 
-test('PrimFFIWord8', [omit_ways(['ghci']), req_c], compile_and_run, ['PrimFFIWord8_c.c'])
+test('PrimFFIWord8', [omit_ways(['ghci']), req_js_c], compile_and_run, ['PrimFFIWord8_c.c'])
 
-test('PrimFFIInt16', [omit_ways(['ghci']), req_c], compile_and_run, ['PrimFFIInt16_c.c'])
+test('PrimFFIInt16', [omit_ways(['ghci']), req_js_c], compile_and_run, ['PrimFFIInt16_c.c'])
 
-test('PrimFFIWord16', [omit_ways(['ghci']), req_c], compile_and_run, ['PrimFFIWord16_c.c'])
+test('PrimFFIWord16', [omit_ways(['ghci']), req_js_c], compile_and_run, ['PrimFFIWord16_c.c'])
 
-test('PrimFFIInt32', [omit_ways(['ghci']), req_c], compile_and_run, ['PrimFFIInt32_c.c'])
+test('PrimFFIInt32', [omit_ways(['ghci']), req_js_c], compile_and_run, ['PrimFFIInt32_c.c'])
 
-test('PrimFFIWord32', [omit_ways(['ghci']), req_c], compile_and_run, ['PrimFFIWord32_c.c'])
+test('PrimFFIWord32', [omit_ways(['ghci']), req_js_c], compile_and_run, ['PrimFFIWord32_c.c'])
 
-test('T493', [omit_ways(['ghci']), req_c], compile_and_run, ['T493_c.c'])
+test('T493', [omit_ways(['ghci']), req_js_c], compile_and_run, ['T493_c.c'])
 
-test('UnliftedNewtypesByteArrayOffset', [omit_ways(['ghci']), req_c], compile_and_run, ['UnliftedNewtypesByteArrayOffset_c.c'])
+test('UnliftedNewtypesByteArrayOffset', [omit_ways(['ghci']), req_js_c], compile_and_run, ['UnliftedNewtypesByteArrayOffset_c.c'])
 
-test('T17471', [omit_ways(['ghci']), req_c], compile_and_run,
+test('T17471', [omit_ways(['ghci']), req_js_c], compile_and_run,
      ['T17471_c.c -optc-D -optcFOO'])
 
 test('IncallAffinity',
@@ -244,7 +244,7 @@ test('IncallAffinity',
      compile_and_run,
      ['IncallAffinity_c.c -no-hs-main'])
 
-test('T19237', req_c, compile_and_run, ['T19237_c.c'])
+test('T19237', req_js_c, compile_and_run, ['T19237_c.c'])
 
 test('T21305', [cmm_src,omit_ways(['ghci'])], multi_compile_and_run,
                  ['T21305', [('T21305_cmm.cmm', '')], ''])


=====================================
testsuite/tests/generics/all.T
=====================================
@@ -21,9 +21,9 @@ test('GFullyStrict', normal, compile_and_run, [''])
 
 test('T5462Yes1', [extra_files(['GEnum/', 'GEq/', 'GFunctor/']),
                    outputdir('out_T5462Yes1'),
-                   req_c]
+                   req_js_c]
     , multimod_compile_and_run, ['T5462Yes1', '-iGEq -iGEnum -iGFunctor'])
-test('T5462Yes2', [extra_files(['GFunctor/']), outputdir('out_T5462Yes2'), req_c]
+test('T5462Yes2', [extra_files(['GFunctor/']), outputdir('out_T5462Yes2'), req_js_c]
     , multimod_compile_and_run, ['T5462Yes2', '-iGFunctor'])
 test('T5462No1', [extra_files(['GFunctor/']), outputdir('out_T5462No1')]
     , multimod_compile_fail, ['T5462No1', '-iGFunctor'])


=====================================
testsuite/tests/ghci/linking/all.T
=====================================
@@ -54,7 +54,7 @@ test('T11531',
      [extra_files(['T11531.hs', 'T11531.c', 'T11531.h']),
       unless(doing_ghci, skip),
       unless(opsys('linux'), skip),
-      req_c,
+      req_js_c,
       req_interp,
       fragile(11531)],
      makefile_test, ['T11531'])


=====================================
testsuite/tests/ghci/linking/dyn/all.T
=====================================
@@ -2,7 +2,7 @@ setTestOpts(req_dynamic_lib_support)
 
 test('load_short_name', [ extra_files(['A.c'])
                         , unless(doing_ghci, skip)
-                        , js_skip
+                        , req_js_c
                         ],
      makefile_test, ['load_short_name'])
 


=====================================
testsuite/tests/package/T20010/all.T
=====================================
@@ -1,4 +1,4 @@
 # Test that GHC links to the C++ standard library as expected
 # when the system-cxx-std-lib package is used.
-test('T20010', req_c, makefile_test, [])
-test('T20010-ghci', [req_c, extra_files(['T20010_c.cpp', 'T20010.hs'])], makefile_test, [])
+test('T20010', req_js_c, makefile_test, [])
+test('T20010-ghci', [req_js_c, extra_files(['T20010_c.cpp', 'T20010.hs'])], makefile_test, [])


=====================================
testsuite/tests/rep-poly/all.T
=====================================
@@ -40,9 +40,9 @@ test('RepPolyArgument', normal, compile_fail, [''])
 test('RepPolyArrowCmd', normal, compile_fail, [''])
 test('RepPolyArrowFun', normal, compile_fail, [''])
 test('RepPolyBackpack1', normal, backpack_compile_fail, [''])
-test('RepPolyBackpack2', req_c, backpack_run, [''])
+test('RepPolyBackpack2', req_js_c, backpack_run, [''])
 test('RepPolyBackpack3', normal, backpack_compile_fail, [''])
-test('RepPolyBackpack4', req_c, backpack_run, [''])
+test('RepPolyBackpack4', req_js_c, backpack_run, [''])
 test('RepPolyBackpack5', js_broken(22360), backpack_run, [''])
 test('RepPolyBinder', normal, compile_fail, [''])
 test('RepPolyCase1', normal, compile_fail, [''])


=====================================
testsuite/tests/rts/all.T
=====================================
@@ -215,7 +215,7 @@ test('EventlogOutput_IPE',
 def noCapabilityOutputFilter(s):
      return re.sub(r'[a-f0-9]+: IPE:', 'IPE:', s)
 
-test('T4059', req_c, makefile_test, ['T4059'])
+test('T4059', req_js_c, makefile_test, ['T4059'])
 
 # Test for #4274
 test('exec_signals',
@@ -265,7 +265,7 @@ test('T7160', [ omit_ways(['nonmoving_thr', 'nonmoving_thr_ghc'])
               , js_skip
               ], compile_and_run, [''])
 
-test('T7040', [omit_ways(['ghci']), req_c], compile_and_run, ['T7040_c.c'])
+test('T7040', [omit_ways(['ghci']), req_js_c], compile_and_run, ['T7040_c.c'])
 
 test('T7040_ghci',
      [extra_files(['T7040_c.h']),
@@ -390,7 +390,7 @@ test('T10590', [ ignore_stderr
                ], compile_and_run, [''])
 
 # 20000 was easily enough to trigger the bug with 7.10
-test('T10904', [ omit_ways(['ghci']), extra_run_opts('20000'), req_c ],
+test('T10904', [ omit_ways(['ghci']), extra_run_opts('20000'), req_js_c ],
                compile_and_run, ['T10904lib.c'])
 
 test('T10728', [extra_run_opts('+RTS -maxN3 -RTS'), only_ways(['threaded2'])],
@@ -488,10 +488,10 @@ test('keep-cafs',
 
 # Test proper functioning of C++ exceptions within a C++ program.
 # On darwin, this requires -fcompact-unwind.
-test('T11829', [ check_errmsg("This is a test"), req_c], compile_and_run,
+test('T11829', [ check_errmsg("This is a test"), req_js_c], compile_and_run,
      ['T11829_c.cpp -package system-cxx-std-lib'])
 
-test('T16514', req_c, compile_and_run, ['T16514_c.c'])
+test('T16514', req_js_c, compile_and_run, ['T16514_c.c'])
 test('test-zeroongc', extra_run_opts('-DZ'), compile_and_run, ['-debug'])
 
 test('T13676',
@@ -501,7 +501,7 @@ test('T13676',
 test('InitEventLogging',
      [ only_ways(['normal'])
      , extra_run_opts('+RTS -RTS')
-     , req_c
+     , req_js_c
      ],
      compile_and_run, ['InitEventLogging_c.c'])
 test('RestartEventLogging',
@@ -526,19 +526,19 @@ test('T19381',
       # memory behavior changes appreciably with the nonmoving collector
       omit_ways(['nonmoving', 'nonmoving_thr', 'nonmoving_thr_sanity'])],
      compile_and_run, [''])
-test('T20199', [ grep_errmsg('Hello'), req_c ]
+test('T20199', [ grep_errmsg('Hello'), req_js_c ]
       , makefile_test, [])
 
-test('cloneMyStack', [req_c,extra_files(['cloneStackLib.c'])], compile_and_run, ['cloneStackLib.c'])
+test('cloneMyStack', [req_js_c,extra_files(['cloneStackLib.c'])], compile_and_run, ['cloneStackLib.c'])
 
 test('cloneMyStack2',
   [ ignore_stdout
   , js_broken(22261) # cloneMyStack# not yet implemented
   ], compile_and_run, [''])
 
-test('cloneMyStack_retBigStackFrame', [req_c,extra_files(['cloneStackLib.c']), ignore_stdout], compile_and_run, ['cloneStackLib.c'])
+test('cloneMyStack_retBigStackFrame', [req_js_c,extra_files(['cloneStackLib.c']), ignore_stdout], compile_and_run, ['cloneStackLib.c'])
 
-test('cloneThreadStack', [req_c,only_ways(['threaded1']), extra_ways(['threaded1']), extra_files(['cloneStackLib.c'])], compile_and_run, ['cloneStackLib.c -threaded'])
+test('cloneThreadStack', [req_js_c,only_ways(['threaded1']), extra_ways(['threaded1']), extra_files(['cloneStackLib.c'])], compile_and_run, ['cloneStackLib.c -threaded'])
 
 test('decodeMyStack',
   [ js_broken(22261) # cloneMyStack# not yet implemented


=====================================
testsuite/tests/rts/linker/T11223/all.T
=====================================
@@ -15,13 +15,13 @@ def normalise_duplicate_errmsg( msg ):
 test('T11223_simple_link',
      [extra_files(['foo.c', 'foo.hs']),
       when(ghc_dynamic(), skip),
-      req_c],
+      req_js_c],
      makefile_test, ['t_11223_simple_link'])
 
 test('T11223_simple_link_lib',
      [extra_files(['foo.c', 'foo.hs']),
       when(ghc_dynamic(), skip),
-      req_c],
+      req_js_c],
      makefile_test, ['t_11223_simple_link_lib'])
 
 # I'm ignoring the output since for this particular invocation normalise_errmsg
@@ -35,37 +35,37 @@ test('T11223_simple_duplicate_lib',
      [extra_files(['bar.c', 'foo.c', 'foo.hs']),
       when(platform('i386-unknown-mingw32'), expect_broken(13515)),
       when(ghc_dynamic(), skip), normalise_errmsg_fun(normalise_duplicate_errmsg),
-      req_c],
+      req_js_c],
      makefile_test, ['t_11223_simple_duplicate_lib'])
 
 test('T11223_simple_unused_duplicate_lib',
      [extra_files(['bar.c', 'foo.c', 'foo.hs']),
       when(ghc_dynamic(), skip),
-      req_c],
+      req_js_c],
      makefile_test, ['t_11223_simple_unused_duplicate_lib'])
 
 test('T11223_link_order_a_b_succeed',
      [extra_files(['bar.c', 'foo.c', 'foo2.hs']),
       when(ghc_dynamic(), skip),
-      req_c],
+      req_js_c],
      makefile_test, ['t_11223_link_order_a_b_succeed'])
 
 test('T11223_link_order_b_a_succeed',
      [extra_files(['bar.c', 'foo.c', 'foo2.hs']),
       when(ghc_dynamic(), skip),
-      req_c],
+      req_js_c],
      makefile_test, ['t_11223_link_order_b_a_succeed'])
 
 test('T11223_link_order_a_b_2_fail',
      [extra_files(['bar.c', 'foo.c', 'foo3.hs']),
       when(ghc_dynamic(), skip), normalise_errmsg_fun(normalise_duplicate_errmsg),
-      req_c],
+      req_js_c],
      makefile_test, ['t_11223_link_order_a_b_2_fail'])
 
 test('T11223_link_order_b_a_2_succeed',
      [extra_files(['bar.c', 'foo.c', 'foo3.hs']),
       when(ghc_dynamic(), skip),
-      req_c],
+      req_js_c],
      makefile_test, ['t_11223_link_order_b_a_2_succeed'])
 
 # Weak Symbols are not currently implemented. So Disable all the tests



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

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/f302c03b0b7dd960273a9b3f3b71ff781de0763e
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/20221026/2c0750f2/attachment-0001.html>


More information about the ghc-commits mailing list