[Git][ghc/ghc][wip/js-staging] Start disabling tests that use TH/interpreter

[Sylvain Henry (@hsyl20)]

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


Commits:
cab01a42 by Sylvain Henry at 2022-10-05T16:34:59+02:00
Start disabling tests that use TH/interpreter

- - - - -


6 changed files:

- testsuite/driver/testlib.py
- testsuite/tests/codeGen/should_compile/T17904.hs
- testsuite/tests/corelint/all.T
- testsuite/tests/dependent/should_compile/all.T
- testsuite/tests/deriving/should_compile/all.T
- testsuite/tests/driver/all.T


Changes:

=====================================
testsuite/driver/testlib.py
=====================================
@@ -255,6 +255,8 @@ def req_dynamic_hs( name, opts ):
 def req_interp( name, opts ):
     if not config.have_interp:
         opts.expect = 'fail'
+    # JS backend doesn't provide an interpreter yet
+    js_skip(name, opts)
 
 def req_rts_linker( name, opts ):
     if not config.have_RTS_linker:


=====================================
testsuite/tests/codeGen/should_compile/T17904.hs
=====================================
@@ -13,8 +13,6 @@ module T17904
 import GHC.Exts ( TYPE, Int (..)  )
 import Prelude hiding (lookup)
 
-{-# ANN module ("HLint: ignore Eta reduce" :: String) #-}
-
 class Hashable a where
     hashWithSalt :: Int -> a -> Int
 


=====================================
testsuite/tests/corelint/all.T
=====================================
@@ -1,6 +1,6 @@
 
 test('T21115', normal, compile_fail, [''])
-test('T21115b', normal, compile_fail, ['-dsuppress-uniques -dsuppress-all'])
+test('T21115b', req_th, compile_fail, ['-dsuppress-uniques -dsuppress-all'])
 test('T21152', normal, compile, ['-g3'])
 
 ## Tests which use the GHC API.


=====================================
testsuite/tests/dependent/should_compile/all.T
=====================================
@@ -2,9 +2,9 @@ test('Dep1', only_ways(['normal']), compile, [''])
 test('Dep2', only_ways(['normal']), compile, [''])
 test('Dep3', only_ways(['normal']), compile, [''])
 test('KindEqualities', only_ways(['normal']), compile, [''])
-test('KindEqualities2', only_ways(['normal']), compile, [''])
-test('Rae31', only_ways(['normal']), compile, [''])
-test('RAE_T32b', only_ways(['normal']), compile, [''])
+test('KindEqualities2', [req_th,only_ways(['normal'])], compile, [''])
+test('Rae31', [req_th,only_ways(['normal'])], compile, [''])
+test('RAE_T32b', [req_th,only_ways(['normal'])], compile, [''])
 test('KindLevels', normal, compile, [''])
 test('RaeBlogPost', normal, compile, [''])
 test('mkGADTVars', normal, compile, [''])
@@ -44,7 +44,7 @@ test('T12742', 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('T13910', [omit_ways(['profasm'])], compile, [''])
+test('T13910', [req_th, omit_ways(['profasm'])], compile, [''])
 test('T13938', [req_th, extra_files(['T13938a.hs'])], makefile_test, ['T13938'])
 test('T14556', normal, compile, [''])
 test('T14720', normal, compile, [''])


=====================================
testsuite/tests/deriving/should_compile/all.T
=====================================
@@ -128,7 +128,7 @@ test('T17339', normal, compile,
      ['-ddump-simpl -dsuppress-idinfo -dno-typeable-binds'])
 test('T17880', normal, compile, [''])
 test('T18055', normal, compile, [''])
-test('T18321', normal, compile, [''])
+test('T18321', req_th, compile, [''])
 test('T18914', normal, compile, [''])
 # We need to find derived instances in the Tc trace dump.
 # They are printed in tcDeriv beginning with "rnd" line


=====================================
testsuite/tests/driver/all.T
=====================================
@@ -291,7 +291,7 @@ test('T17786', unless(opsys('mingw32'), skip), makefile_test, [])
 test('T18369', normal, compile, ['-O'])
 test('T21682', normal, compile_fail, ['-Werror=unrecognised-warning-flags -Wfoo'])
 test('FullGHCVersion', normal, compile_and_run, ['-package ghc-boot'])
-test('OneShotTH', normal, makefile_test, [])
+test('OneShotTH', req_th, makefile_test, [])
 test('T17481', normal, makefile_test, [])
 test('T20084', normal, makefile_test, [])
 test('RunMode', extra_files(['RunMode/Test.hs']), run_command, ['{compiler} --run -iRunMode/ -ignore-dot-ghci RunMode.hs -- hello'])



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

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/cab01a427b87bf7391336a62948d2f01d2a2f094
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/20221005/2695b21f/attachment-0001.html>