From: Tom Tromey <tromey@redhat.com>
Date: Mon, 18 Dec 2000 23:13:05 +0000 (+0000)
Subject: mauve.exp (test_mauve): Don't look for exceptions thrown in the test harness.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=e2ef2bf880b8c33ac444c6fdf4e6afc2852ff19b;p=gcc.git

mauve.exp (test_mauve): Don't look for exceptions thrown in the test harness.

	* libjava.mauve/mauve.exp (test_mauve): Don't look for exceptions
	thrown in the test harness.
	(test_mauve_sim): Likewise.

From-SVN: r38368
---

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 {