diff options
author | Ian Lynagh <igloo@earth.li> | 2011-09-06 15:35:11 +0100 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2011-09-06 15:35:11 +0100 |
commit | 89f34a495814e799c76dc456cf7fe7212081014d (patch) | |
tree | 870e153483b8ef1d820d2a8af8eb00d345319f02 /testsuite/tests | |
parent | aa65815350652c7a703c1323260a48799d5c3483 (diff) | |
download | haskell-89f34a495814e799c76dc456cf7fe7212081014d.tar.gz |
Fix some more written-but-not-cleaned files
Diffstat (limited to 'testsuite/tests')
-rw-r--r-- | testsuite/tests/safeHaskell/safeLanguage/all.T | 41 | ||||
-rw-r--r-- | testsuite/tests/safeHaskell/unsafeLibs/all.T | 10 | ||||
-rw-r--r-- | testsuite/tests/th/TH_import_loop/TH_import_loop.T | 7 | ||||
-rw-r--r-- | testsuite/tests/th/TH_spliceViewPat/test.T | 5 |
4 files changed, 52 insertions, 11 deletions
diff --git a/testsuite/tests/safeHaskell/safeLanguage/all.T b/testsuite/tests/safeHaskell/safeLanguage/all.T index 1e3fb31dee..37c316cc2a 100644 --- a/testsuite/tests/safeHaskell/safeLanguage/all.T +++ b/testsuite/tests/safeHaskell/safeLanguage/all.T @@ -9,14 +9,41 @@ test('SafeLang02', normal, compile, ['-trust base']) test('SafeLang03', normal, compile, ['-trust base']) test('SafeLang04', normal, compile_and_run, ['']) test('SafeLang05', normal, compile_and_run, ['-trust base']) -test('SafeLang06', normal, compile_and_run, ['']) +test('SafeLang06', + extra_clean(['SafeLang06_A.o', 'SafeLang06_A.hi']), + compile_and_run, + ['']) test('SafeLang07', normal, compile_fail, ['']) test('SafeLang08', normal, compile_fail, ['']) -test('SafeLang09', exit_code(1), compile_and_run, ['']) -test('SafeLang10', normal, multimod_compile_fail, ['SafeLang10', '-trust base']) -test('SafeLang11', req_interp, multimod_compile_and_run, ['SafeLang11', '-trust base']) +test('SafeLang09', + [exit_code(1), + extra_clean(['SafeLang09_A.o', 'SafeLang09_A.hi', + 'SafeLang09_B.o', 'SafeLang09_B.hi'])], + compile_and_run, + ['']) +test('SafeLang10', + extra_clean(['SafeLang10_A.o', 'SafeLang10_A.hi', + 'SafeLang10_B.o', 'SafeLang10_B.hi']), + multimod_compile_fail, + ['SafeLang10', '-trust base']) +test('SafeLang11', + [req_interp, + extra_clean(['SafeLang11_A.o', 'SafeLang11_A.hi', + 'SafeLang11_B.o', 'SafeLang11_B.hi'])], + multimod_compile_and_run, + ['SafeLang11', '-trust base']) test('SafeLang12', normal, multimod_compile_fail, ['SafeLang12', '-trust base']) -test('SafeLang13', normal, multimod_compile_and_run, ['SafeLang13', '-trust base']) -test('SafeLang14', normal, multimod_compile_fail, ['SafeLang14', '-trust base -XSafe']) -test('SafeLang15', exit_code(1), multimod_compile_and_run, ['SafeLang15', '-trust base -XSafe']) +test('SafeLang13', + extra_clean(['SafeLang13_A.o', 'SafeLang13_A.hi']), + multimod_compile_and_run, + ['SafeLang13', '-trust base']) +test('SafeLang14', + extra_clean(['SafeLang14_A.o', 'SafeLang14_A.hi']), + multimod_compile_fail, + ['SafeLang14', '-trust base -XSafe']) +test('SafeLang15', + [exit_code(1), + extra_clean(['SafeLang15_A.o', 'SafeLang15_A.hi'])], + multimod_compile_and_run, + ['SafeLang15', '-trust base -XSafe']) diff --git a/testsuite/tests/safeHaskell/unsafeLibs/all.T b/testsuite/tests/safeHaskell/unsafeLibs/all.T index 839da38f67..2e1ddb5c2e 100644 --- a/testsuite/tests/safeHaskell/unsafeLibs/all.T +++ b/testsuite/tests/safeHaskell/unsafeLibs/all.T @@ -16,6 +16,12 @@ test('Dep09', normal, compile, ['']) test('Dep10', normal, compile, ['']) test('BadImport01', normal, compile_fail, ['']) -test('BadImport02', normal, multimod_compile_and_run, ['BadImport02', '']) -test('BadImport03', normal, multimod_compile_fail, ['BadImport03', '']) +test('BadImport02', + extra_clean(['BadImport02_A.o', 'BadImport02_A.hi']), + multimod_compile_and_run, + ['BadImport02', '']) +test('BadImport03', + extra_clean(['BadImport03_A.o', 'BadImport03_A.hi']), + multimod_compile_fail, + ['BadImport03', '']) diff --git a/testsuite/tests/th/TH_import_loop/TH_import_loop.T b/testsuite/tests/th/TH_import_loop/TH_import_loop.T index ebb8a427a7..37059e1d6c 100644 --- a/testsuite/tests/th/TH_import_loop/TH_import_loop.T +++ b/testsuite/tests/th/TH_import_loop/TH_import_loop.T @@ -1,5 +1,10 @@ setTestOpts(if_compiler_profiled(skip)) -test('TH_import_loop', expect_broken(1012), multimod_compile_and_run, ['Main', '-v0']) +test('TH_import_loop', + [extra_clean(['ModuleA.o-boot', 'ModuleA.hi-boot', + 'ModuleC.o', 'ModuleC.hi']), + expect_broken(1012)], + multimod_compile_and_run, + ['Main', '-v0']) diff --git a/testsuite/tests/th/TH_spliceViewPat/test.T b/testsuite/tests/th/TH_spliceViewPat/test.T index fa50658a6b..c93e1cb3a7 100644 --- a/testsuite/tests/th/TH_spliceViewPat/test.T +++ b/testsuite/tests/th/TH_spliceViewPat/test.T @@ -8,4 +8,7 @@ setTestOpts(only_compiler_types(['ghc'])) setTestOpts(only_ways(['normal','ghci'])) setTestOpts(if_compiler_profiled(skip)) -test('TH_spliceViewPat', normal, multimod_compile_and_run, [ 'Main', '' ]) +test('TH_spliceViewPat', + extra_clean(['Main.o', 'Main.hi', 'A.o', 'A.hi']), + multimod_compile_and_run, + ['Main', '']) |