summaryrefslogtreecommitdiff
path: root/testsuite/tests
diff options
context:
space:
mode:
authorReid Barton <rwbarton@gmail.com>2017-02-24 20:56:19 -0500
committerBen Gamari <ben@smart-cactus.org>2017-02-26 17:30:44 -0500
commit98119f5a5224d321a1765f262c8c76dfd1b8ed35 (patch)
tree2ab3db7664a092bfbf6af82a26fb50799695f7d7 /testsuite/tests
parent8bb63c2e982a12ad5f436320948e23a718069a4f (diff)
downloadhaskell-98119f5a5224d321a1765f262c8c76dfd1b8ed35.tar.gz
tests: manually move some extra_files into *.T files
Some of the *.T files were in libraries/hpc, so this contains an update to that submodule.
Diffstat (limited to 'testsuite/tests')
-rw-r--r--testsuite/tests/cabal/cabal01/all.T3
-rw-r--r--testsuite/tests/cabal/sigcabal01/all.T2
-rw-r--r--testsuite/tests/driver/dynamic_flags_002/all.T15
-rw-r--r--testsuite/tests/generics/all.T7
-rw-r--r--testsuite/tests/ghc-e/should_fail/all.T3
-rw-r--r--testsuite/tests/ghci.debugger/scripts/all.T3
-rwxr-xr-xtestsuite/tests/ghci/scripts/all.T9
-rw-r--r--testsuite/tests/overloadedrecflds/should_fail/all.T3
-rw-r--r--testsuite/tests/rts/all.T18
-rw-r--r--testsuite/tests/typecheck/T11824/all.T5
10 files changed, 44 insertions, 24 deletions
diff --git a/testsuite/tests/cabal/cabal01/all.T b/testsuite/tests/cabal/cabal01/all.T
index 43485ead3d..8da74f5eed 100644
--- a/testsuite/tests/cabal/cabal01/all.T
+++ b/testsuite/tests/cabal/cabal01/all.T
@@ -22,6 +22,7 @@ def ignoreLdOutput(str):
return re.sub('Creating library file: dist.build.libHStest-1.0-ghc[0-9.]*.dll.a\n', '', str)
test('cabal01',
- normalise_errmsg_fun(ignoreLdOutput),
+ [extra_files(['A.hs', 'B/', 'MainA.hs', 'Setup.lhs', 'c_src/', 'hello.c', 'test.cabal']),
+ normalise_errmsg_fun(ignoreLdOutput)],
run_command,
['$MAKE -s --no-print-directory cabal01 VANILLA=' + vanilla + ' PROF=' + prof + ' DYN=' + dyn + ' ' + cleanup])
diff --git a/testsuite/tests/cabal/sigcabal01/all.T b/testsuite/tests/cabal/sigcabal01/all.T
index 4a1bad9956..7f6df90619 100644
--- a/testsuite/tests/cabal/sigcabal01/all.T
+++ b/testsuite/tests/cabal/sigcabal01/all.T
@@ -4,6 +4,6 @@ else:
cleanup = 'CLEANUP=0'
test('sigcabal01',
- expect_broken(10622),
+ [extra_files(['Main.hs', 'Setup.hs', 'p/']), expect_broken(10622)],
run_command,
['$MAKE -s --no-print-directory sigcabal01 ' + cleanup])
diff --git a/testsuite/tests/driver/dynamic_flags_002/all.T b/testsuite/tests/driver/dynamic_flags_002/all.T
index e5a4a564fa..27d47fee67 100644
--- a/testsuite/tests/driver/dynamic_flags_002/all.T
+++ b/testsuite/tests/driver/dynamic_flags_002/all.T
@@ -1,12 +1,17 @@
test('dynamic_flags_002A',
- when(fast(), skip), multimod_compile, ['A_Main', '-v0'])
+ [extra_files(['A_First.hs', 'A_Main.hs', 'A_Second.hs']),
+ when(fast(), skip)], multimod_compile, ['A_Main', '-v0'])
test('dynamic_flags_002B',
- when(fast(), skip), multimod_compile, ['B_Main', '-v0'])
+ [extra_files(['B_First.hs', 'B_Main.hs', 'B_Second.hs']),
+ when(fast(), skip)], multimod_compile, ['B_Main', '-v0'])
test('dynamic_flags_002C',
- when(fast(), skip), multimod_compile, ['C_Main', '-v0'])
+ [extra_files(['C_Child.hs', 'C_Main.hs']),
+ when(fast(), skip)], multimod_compile, ['C_Main', '-v0'])
test('dynamic_flags_002D',
- when(fast(), skip), multimod_compile, ['D_Main', '-v0'])
+ [extra_files(['D_Child.hs', 'D_Main.hs']),
+ when(fast(), skip)], multimod_compile, ['D_Main', '-v0'])
test('dynamic_flags_002Many',
- when(fast(), skip), multimod_compile,
+ [extra_files(['ManyFirst.hs', 'ManySecond.hs', 'ManyThird.hs']),
+ when(fast(), skip)], multimod_compile,
['ManyFirst ManySecond ManyThird', '-v0'])
diff --git a/testsuite/tests/generics/all.T b/testsuite/tests/generics/all.T
index 2c67654aeb..1d4aeaee38 100644
--- a/testsuite/tests/generics/all.T
+++ b/testsuite/tests/generics/all.T
@@ -19,11 +19,12 @@ test('GenCannotDoRep1_8', normal, compile_fail, [''])
test('GFullyStrict', normal, compile_and_run, [''])
-test('T5462Yes1', outputdir('out_T5462Yes1')
+test('T5462Yes1', [extra_files(['GEnum/', 'GEq/', 'GFunctor/']),
+ outputdir('out_T5462Yes1')]
, multimod_compile_and_run, ['T5462Yes1', '-iGEq -iGEnum -iGFunctor'])
-test('T5462Yes2', outputdir('out_T5462Yes2')
+test('T5462Yes2', [extra_files(['GFunctor/']), outputdir('out_T5462Yes2')]
, multimod_compile_and_run, ['T5462Yes2', '-iGFunctor'])
-test('T5462No1', outputdir('out_T5462No1')
+test('T5462No1', [extra_files(['GFunctor/']), outputdir('out_T5462No1')]
, multimod_compile_fail, ['T5462No1', '-iGFunctor'])
test('T5884', [], multimod_compile, ['T5884Other', '-v0'])
diff --git a/testsuite/tests/ghc-e/should_fail/all.T b/testsuite/tests/ghc-e/should_fail/all.T
index c4baa0f3d4..9a75481621 100644
--- a/testsuite/tests/ghc-e/should_fail/all.T
+++ b/testsuite/tests/ghc-e/should_fail/all.T
@@ -18,5 +18,6 @@ test('ghc-e-fail2', req_interp, run_command,
# Don't run on Windows, as executable is written to T9930.exe
# and no failure is induced.
-test('T9930fail', when(opsys('mingw32'), skip), run_command,
+test('T9930fail', [extra_files(['T9930']), when(opsys('mingw32'), skip)],
+ run_command,
['$MAKE --no-print-directory -s T9930fail'])
diff --git a/testsuite/tests/ghci.debugger/scripts/all.T b/testsuite/tests/ghci.debugger/scripts/all.T
index e87e94197f..ef17450e89 100644
--- a/testsuite/tests/ghci.debugger/scripts/all.T
+++ b/testsuite/tests/ghci.debugger/scripts/all.T
@@ -71,7 +71,8 @@ test('dynbrk001', normal, ghci_script, ['dynbrk001.script'])
test('dynbrk002', normal, ghci_script, ['dynbrk002.script'])
test('dynbrk003', normal, ghci_script, ['dynbrk003.script'])
test('dynbrk004', normal, ghci_script, ['dynbrk004.script'])
-test('dynbrk005', expect_broken(1530), ghci_script, ['dynbrk005.script'])
+test('dynbrk005', [extra_files(['TupleN.hs']), expect_broken(1530)],
+ ghci_script, ['dynbrk005.script'])
test('dynbrk007', normal, ghci_script, ['dynbrk007.script'])
test('dynbrk008', normal, ghci_script, ['dynbrk008.script'])
test('dynbrk009', normal, ghci_script, ['dynbrk009.script'])
diff --git a/testsuite/tests/ghci/scripts/all.T b/testsuite/tests/ghci/scripts/all.T
index 5621addb26..2e535349c9 100755
--- a/testsuite/tests/ghci/scripts/all.T
+++ b/testsuite/tests/ghci/scripts/all.T
@@ -94,7 +94,8 @@ test('ghci056',
test('ghci057', normal, ghci_script, ['ghci057.script'])
test('ghci060', normal, ghci_script, ['ghci060.script'])
test('ghci061', normal, ghci_script, ['ghci061.script'])
-test('ghci062', when(config.have_ext_interp, extra_ways(['ghci-ext'])),
+test('ghci062', [extra_files(['ghci062/', 'ghci062/Test.hs']),
+ when(config.have_ext_interp, extra_ways(['ghci-ext']))],
ghci_script, ['ghci062.script'])
test('T2452', normal, ghci_script, ['T2452.script'])
@@ -217,8 +218,10 @@ test('T11098', normal, ghci_script, ['T11098.script'])
test('T8316', expect_broken(8316), ghci_script, ['T8316.script'])
test('T11252', normal, ghci_script, ['T11252.script'])
-test('T10576a', expect_broken(10576), ghci_script, ['T10576a.script'])
-test('T10576b', expect_broken(10576), ghci_script, ['T10576b.script'])
+test('T10576a', [extra_files(['T10576.hs']), expect_broken(10576)],
+ ghci_script, ['T10576a.script'])
+test('T10576b', [extra_files(['T10576.hs']), expect_broken(10576)],
+ ghci_script, ['T10576b.script'])
test('T11051a', normal, ghci_script, ['T11051a.script'])
test('T11051b', normal, ghci_script, ['T11051b.script'])
test('T11266', ignore_stdout, ghci_script, ['T11266.script'])
diff --git a/testsuite/tests/overloadedrecflds/should_fail/all.T b/testsuite/tests/overloadedrecflds/should_fail/all.T
index 98f16a056b..2b0b5927a5 100644
--- a/testsuite/tests/overloadedrecflds/should_fail/all.T
+++ b/testsuite/tests/overloadedrecflds/should_fail/all.T
@@ -25,8 +25,7 @@ test('T11167_ambiguous_fixity', [], multimod_compile_fail,
['T11167_ambiguous_fixity', ''])
test('T13132_duplicaterecflds', normal, compile_fail, [''])
test('NoParent', normal, compile_fail, [''])
-test('hasfieldfail01',
- extra_clean(['HasFieldFail01_A.hi', 'HasFieldFail01_A.o']),
+test('hasfieldfail01', extra_files(['HasFieldFail01_A.hs']),
multimod_compile_fail, ['hasfieldfail01', ''])
test('hasfieldfail02', normal, compile_fail, [''])
test('hasfieldfail03', normal, compile_fail, [''])
diff --git a/testsuite/tests/rts/all.T b/testsuite/tests/rts/all.T
index 2fae73ccf4..79e1461596 100644
--- a/testsuite/tests/rts/all.T
+++ b/testsuite/tests/rts/all.T
@@ -86,7 +86,9 @@ test('testwsdeque', [unless(in_tree_compiler(), skip),
test('T3236', [c_src, only_ways(['normal','threaded1']), exit_code(1)], compile_and_run, [''])
test('stack001', extra_run_opts('+RTS -K32m -RTS'), compile_and_run, [''])
-test('stack002', extra_run_opts('+RTS -K32m -k4m -RTS'), compile_and_run, [''])
+test('stack002', [extra_files(['stack001.hs']),
+ extra_run_opts('+RTS -K32m -k4m -RTS')],
+ compile_and_run, [''])
# run this test with very small stack chunks to exercise the stack
# overflow/underflow machinery.
@@ -178,13 +180,17 @@ def checkDynAsm(actual_file, normaliser):
# These should have extra_clean() arguments, but I need
# to somehow extract out the name of DLLs to do that
-test('T5435_v_asm', when(arch('powerpc64') or arch('powerpc64le'),
- expect_broken(11259)),
+test('T5435_v_asm', [extra_files(['T5435.hs', 'T5435_asm.c']),
+ when(arch('powerpc64') or arch('powerpc64le'),
+ expect_broken(11259))],
run_command, ['$MAKE -s --no-print-directory T5435_v_asm'])
-test('T5435_v_gcc', when(arch('powerpc64') or arch('powerpc64le'),
- expect_broken(11259)),
+test('T5435_v_gcc', [extra_files(['T5435.hs', 'T5435_gcc.c']),
+ when(arch('powerpc64') or arch('powerpc64le'),
+ expect_broken(11259))],
run_command, ['$MAKE -s --no-print-directory T5435_v_gcc'])
-test('T5435_dyn_asm', check_stdout(checkDynAsm), run_command, ['$MAKE -s --no-print-directory T5435_dyn_asm'])
+test('T5435_dyn_asm', [extra_files(['T5435.hs', 'T5435_asm.c']),
+ check_stdout(checkDynAsm)],
+ run_command, ['$MAKE -s --no-print-directory T5435_dyn_asm'])
test('T5435_dyn_gcc', normal , run_command, ['$MAKE -s --no-print-directory T5435_dyn_gcc'])
test('T5993', extra_run_opts('+RTS -k8 -RTS'), compile_and_run, [''])
diff --git a/testsuite/tests/typecheck/T11824/all.T b/testsuite/tests/typecheck/T11824/all.T
index 88ce2e82ea..dc1c45ece9 100644
--- a/testsuite/tests/typecheck/T11824/all.T
+++ b/testsuite/tests/typecheck/T11824/all.T
@@ -1 +1,4 @@
-test('T11824', expect_broken(11824), compile_and_run, [''])
+test('T11824',
+ [extra_files(['TyCon.hs', 'Type.hs', 'Type.hs-boot', 'Unbound/']),
+ expect_broken(11824)],
+ compile_and_run, [''])