[commit: testsuite] master: Fixed Trac #8540 (3549b37)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/testsuite

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/3549b37d47304230de45648c379c1c4fd1460434/testsuite

>---------------------------------------------------------------

commit 3549b37d47304230de45648c379c1c4fd1460434
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Thu Nov 28 16:01:45 2013 +0000

    Fixed Trac #8540


>---------------------------------------------------------------

3549b37d47304230de45648c379c1c4fd1460434
 tests/ghci.debugger/scripts/all.T |    6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/tests/ghci.debugger/scripts/all.T b/tests/ghci.debugger/scripts/all.T
index 5429671..ca5c9a1 100644
--- a/tests/ghci.debugger/scripts/all.T
+++ b/tests/ghci.debugger/scripts/all.T
@@ -19,7 +19,7 @@ test('print014', normal, ghci_script, ['print014.script'])
 test('print016', normal, ghci_script, ['print016.script'])
 test('print017', normal, ghci_script, ['print017.script'])
 test('print018', normal, ghci_script, ['print018.script'])
-test('print019', when(compiler_debugged(),expect_broken(8540)), ghci_script, ['print019.script'])
+test('print019', normal, ghci_script, ['print019.script'])
 test('print020', normal, ghci_script, ['print020.script'])
 test('print021', normal, ghci_script, ['print021.script'])
 test('print022', normal, ghci_script, ['print022.script'])
@@ -41,9 +41,9 @@ test('print035',
 
 test('break001', normal, ghci_script, ['break001.script'])
 test('break002', normal, ghci_script, ['break002.script'])
-test('break003', when(compiler_debugged(),expect_broken(8540)), ghci_script, ['break003.script'])
+test('break003', normal, ghci_script, ['break003.script'])
 test('break005', normal, ghci_script, ['break005.script'])
-test('break006', when(compiler_debugged(),expect_broken(8540)), ghci_script, ['break006.script'])
+test('break006', normal, ghci_script, ['break006.script'])
 test('break007', extra_clean(['Break007.o', 'Break007.hi']),
      ghci_script, ['break007.script'])
 test('break008', normal, ghci_script, ['break008.script'])