diff options
author | Ian Lynagh <igloo@earth.li> | 2011-09-06 12:42:57 +0100 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2011-09-06 12:42:57 +0100 |
commit | 83db11bd1b20f45408f76dd9b28b389d8a020619 (patch) | |
tree | 58d04c553a3245dd0417b420bd8db58f7296a4ea /testsuite/tests/ghci.debugger | |
parent | 1ba832ef0ab77e22b87f9ca79a39a500699e74ad (diff) | |
download | haskell-83db11bd1b20f45408f76dd9b28b389d8a020619.tar.gz |
Fix some more written-but-not-cleaned files
Diffstat (limited to 'testsuite/tests/ghci.debugger')
-rw-r--r-- | testsuite/tests/ghci.debugger/scripts/break022/A1.hs (renamed from testsuite/tests/ghci.debugger/scripts/break022/A.hs) | 0 | ||||
-rw-r--r-- | testsuite/tests/ghci.debugger/scripts/break022/all.T | 2 | ||||
-rw-r--r-- | testsuite/tests/ghci.debugger/scripts/break022/break022.script | 1 | ||||
-rw-r--r-- | testsuite/tests/ghci.debugger/scripts/break023/A1.hs (renamed from testsuite/tests/ghci.debugger/scripts/break023/A.hs) | 0 | ||||
-rw-r--r-- | testsuite/tests/ghci.debugger/scripts/break023/all.T | 2 | ||||
-rw-r--r-- | testsuite/tests/ghci.debugger/scripts/break023/break023.script | 1 |
6 files changed, 4 insertions, 2 deletions
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 |