Fix some more written-but-not-cleaned files

8 files changed, 7 insertions, 3 deletions

diff --git a/testsuite/tests/dph/diophantine/dph-diophantine.T b/testsuite/tests/dph/diophantine/dph-diophantine.T
index ebba1cd490..61120b29d3 100644
--- a/testsuite/tests/dph/diophantine/dph-diophantine.T
+++ b/testsuite/tests/dph/diophantine/dph-diophantine.T
@@ -13,6 +13,8 @@ test    ('dph-diophantine-opt'
 test    ('dph-diophantine-fast' 
         , [ reqlib('dph-par')
           , reqlib('dph-prim-par')
+          , extra_clean(['DiophantineVect.hi', 'DiophantineVect.o',
+                         'Main.hi', 'Main.o'])
           , only_ways(['normal', 'threaded1', 'threaded2']) ] 
         , multimod_compile_and_run 
         , [ 'Main'
diff --git a/testsuite/tests/ghci.debugger/scripts/break022/A.hs b/testsuite/tests/ghci.debugger/scripts/break022/A1.hs
index bf903ab11e..bf903ab11e 100644
--- a/testsuite/tests/ghci.debugger/scripts/break022/A.hs
+++ b/testsuite/tests/ghci.debugger/scripts/break022/A1.hs
diff --git a/testsuite/tests/ghci.debugger/scripts/break022/all.T b/testsuite/tests/ghci.debugger/scripts/break022/all.T
index f81e8de45c..d8cf081ed2 100644
--- a/testsuite/tests/ghci.debugger/scripts/break022/all.T
+++ b/testsuite/tests/ghci.debugger/scripts/break022/all.T
@@ -1,4 +1,4 @@
 setTestOpts(extra_run_opts('-ignore-dot-ghci'))
 setTestOpts(if_compiler_profiled(skip))
 
-test('break022', normal, ghci_script, ['break022.script'])
+test('break022', extra_clean(['A.hs']), ghci_script, ['break022.script'])
diff --git a/testsuite/tests/ghci.debugger/scripts/break022/break022.script b/testsuite/tests/ghci.debugger/scripts/break022/break022.script
index e0aaeda371..15e505ff71 100644
--- a/testsuite/tests/ghci.debugger/scripts/break022/break022.script
+++ b/testsuite/tests/ghci.debugger/scripts/break022/break022.script
@@ -10,6 +10,7 @@
 -- But first we touch A, and reload. B.boot will be reloaded, but not B,  which will end up with an empty modbreaks. When we :step into B, ghci will die with an out of bounds access in B's break array.
 -- The effect we want is B.boot being reloaded while B is not.
 
+:! cp A1.hs A.hs
 :l C
 :! touch A.hs
 :r
diff --git a/testsuite/tests/ghci.debugger/scripts/break023/A.hs b/testsuite/tests/ghci.debugger/scripts/break023/A1.hs
index 138a4faa1c..138a4faa1c 100644
--- a/testsuite/tests/ghci.debugger/scripts/break023/A.hs
+++ b/testsuite/tests/ghci.debugger/scripts/break023/A1.hs
diff --git a/testsuite/tests/ghci.debugger/scripts/break023/all.T b/testsuite/tests/ghci.debugger/scripts/break023/all.T
index 3858849735..0c33302e43 100644
--- a/testsuite/tests/ghci.debugger/scripts/break023/all.T
+++ b/testsuite/tests/ghci.debugger/scripts/break023/all.T
@@ -1,4 +1,4 @@
 setTestOpts(extra_run_opts('-ignore-dot-ghci'))
 setTestOpts(if_compiler_profiled(skip))
 
-test('break023', normal, ghci_script, ['break023.script'])
+test('break023', extra_clean(['A.hs']), ghci_script, ['break023.script'])
diff --git a/testsuite/tests/ghci.debugger/scripts/break023/break023.script b/testsuite/tests/ghci.debugger/scripts/break023/break023.script
index 4ddd2d6be4..a7a0916863 100644
--- a/testsuite/tests/ghci.debugger/scripts/break023/break023.script
+++ b/testsuite/tests/ghci.debugger/scripts/break023/break023.script
@@ -10,6 +10,7 @@
 -- But first we touch A, and reload. B.boot will be reloaded, but not B,  which will end up with an empty modbreaks. We can no longer set a breakpoint in B.b
 -- The effect we want is B.boot being reloaded while B is not.
 
+:! cp A1.hs A.hs
 :l C
 :break b  -- it works ok at this point
 :! touch A.hs
diff --git a/testsuite/tests/lib/should_run/all.T b/testsuite/tests/lib/should_run/all.T
index 502f868e7f..4855cefc02 100644
--- a/testsuite/tests/lib/should_run/all.T
+++ b/testsuite/tests/lib/should_run/all.T
@@ -1,4 +1,4 @@
-test('array001', 	normal, compile_and_run, [''])
+test('array001', 	extra_clean(['array001.data']), compile_and_run, [''])
 
 test('char001', 	normal, compile_and_run, [''])
 test('char002', 	normal, compile_and_run, [''])