+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
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 {
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 {