diff options
author | Frank Ch. Eigler <fche@redhat.com> | 2001-10-04 22:11:12 +0000 |
---|---|---|
committer | Frank Ch. Eigler <fche@redhat.com> | 2001-10-04 22:11:12 +0000 |
commit | 1d9d99f32d861ae85dd59689ada801cc51d3ac91 (patch) | |
tree | b0ac8d5985b6469ef87984e53385f1ad99d65a87 /gdb/testsuite/lib | |
parent | f668894301100e2e5ef05832e2dee08b90112a1e (diff) | |
download | gdb-1d9d99f32d861ae85dd59689ada801cc51d3ac91.zip gdb-1d9d99f32d861ae85dd59689ada801cc51d3ac91.tar.gz gdb-1d9d99f32d861ae85dd59689ada801cc51d3ac91.tar.bz2 |
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.
Diffstat (limited to 'gdb/testsuite/lib')
-rw-r--r-- | gdb/testsuite/lib/insight-support.exp | 2 |
1 files changed, 1 insertions, 1 deletions
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 } |