From 1d9d99f32d861ae85dd59689ada801cc51d3ac91 Mon Sep 17 00:00:00 2001 From: "Frank Ch. Eigler" Date: Thu, 4 Oct 2001 22:11:12 +0000 Subject: [PATCH] 2001-10-04 Frank Ch. Eigler * lib/insight-support.exp (gdbtk_start): Don't exit dejagnu if gdb child process crashes, just signal an error. --- gdb/testsuite/ChangeLog | 5 +++++ gdb/testsuite/lib/insight-support.exp | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 59d888a0c7d..04182ea7f53 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2001-10-04 Frank Ch. Eigler + + * lib/insight-support.exp (gdbtk_start): Don't exit dejagnu + if gdb child process crashes, just signal an error. + 2001-10-02 Jim Blandy * lib/gdb.exp (test_xfail_format): Simplify. diff --git a/gdb/testsuite/lib/insight-support.exp b/gdb/testsuite/lib/insight-support.exp index a296c7899c9..42d14a9a27a 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 } -- 2.30.2