From 1d9d99f32d861ae85dd59689ada801cc51d3ac91 Mon Sep 17 00:00:00 2001
From: "Frank Ch. Eigler" <fche@redhat.com>
Date: Thu, 4 Oct 2001 22:11:12 +0000
Subject: 2001-10-04 Frank Ch. Eigler <fche@redhat.com>
* lib/insight-support.exp (gdbtk_start): Don't exit dejagnu
if gdb child process crashes, just signal an error.
---
gdb/testsuite/lib/insight-support.exp | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
(limited to 'gdb/testsuite/lib')
diff --git a/gdb/testsuite/lib/insight-support.exp b/gdb/testsuite/lib/insight-support.exp
index a296c78..42d14a9 100644
--- a/gdb/testsuite/lib/insight-support.exp
+++ b/gdb/testsuite/lib/insight-support.exp
@@ -94,7 +94,7 @@ proc gdbtk_start {test} {
set err [catch {exec $GDB -nx -q --tclcommand=$test} res]
if { $err } {
perror "Execing $GDB failed: $res"
- exit 1;
+ append res "\nERROR gdb-crash"
}
return $res
}
--
cgit v1.1