diff options
| author | tromey <tromey@138bc75d-0d04-0410-961f-82ee72b054a4> | 2000-12-18 23:13:05 +0000 |
|---|---|---|
| committer | tromey <tromey@138bc75d-0d04-0410-961f-82ee72b054a4> | 2000-12-18 23:13:05 +0000 |
| commit | ef251760a3c204ac6e1e37bff3043fccb2fe5f22 (patch) | |
| tree | 96c2acbc2d6dd24102cc159595abc8a4ef535eab /libjava/testsuite | |
| parent | bf9603160f01b281d6ca78be420e37bec510d774 (diff) | |
| download | gcc-ef251760a3c204ac6e1e37bff3043fccb2fe5f22.tar.gz | |
* libjava.mauve/mauve.exp (test_mauve): Don't look for exceptions
thrown in the test harness.
(test_mauve_sim): Likewise.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@38368 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libjava/testsuite')
| -rw-r--r-- | libjava/testsuite/ChangeLog | 6 | ||||
| -rw-r--r-- | libjava/testsuite/libjava.mauve/mauve.exp | 22 |
2 files changed, 6 insertions, 22 deletions
diff --git a/libjava/testsuite/ChangeLog b/libjava/testsuite/ChangeLog index eb203074e04..15c61dd0263 100644 --- a/libjava/testsuite/ChangeLog +++ b/libjava/testsuite/ChangeLog @@ -1,3 +1,9 @@ +2000-12-18 Tom Tromey <tromey@redhat.com> + + * libjava.mauve/mauve.exp (test_mauve): Don't look for exceptions + thrown in the test harness. + (test_mauve_sim): Likewise. + 2000-12-16 Tom Tromey <tromey@redhat.com> * lib/libjava.exp (test_libjava_from_javac): Strange quoting trick diff --git a/libjava/testsuite/libjava.mauve/mauve.exp b/libjava/testsuite/libjava.mauve/mauve.exp index 04f637a747d..ba230335a4c 100644 --- a/libjava/testsuite/libjava.mauve/mauve.exp +++ b/libjava/testsuite/libjava.mauve/mauve.exp @@ -186,17 +186,6 @@ proc test_mauve {} { set result [libjava_load [pwd]/DejaGNUTestHarness \ "$env(MAUVEDIR) $class" ""] - # Test for an exception thrown in the test harness itself. This - # isn't enough to test for all faults in the test harness, but - # it's better than nothing. - set output [lindex $result 1]; - if [regexp "Exception: " $output] then { - fail $output - continue - } - - pass "Execute for $class" - # Extract pass/failure info from output. foreach line [split [lindex $result 1] \n] { if {[regexp -- {^(PASS|FAIL): (.*)$} $line ignore what msg]} then { @@ -354,17 +343,6 @@ proc test_mauve_sim {} { set result [libjava_load [pwd]/DejaGNUTestHarness \ "$env(MAUVEDIR) $class" ""] - # Test for an exception thrown in the test harness itself. This - # isn't enough to test for all faults in the test harness, but - # it's better than nothing. - set output [lindex $result 1]; - if [regexp "Exception: " $output] then { - fail $output - continue - } - - pass "Execute for $class" - # Extract pass/failure info from output. foreach line [split [lindex $result 1] \n] { if {[regexp -- {^(PASS|FAIL): (.*)$} $line ignore what msg]} then { |