From e9520ccc32f4d05d1ea34bb1252e53fd76bd342f Mon Sep 17 00:00:00 2001 From: cagney Date: Mon, 12 Jul 2004 21:39:34 +0000 Subject: [PATCH] 2004-07-12 Andrew Cagney * gdb.base/annota1.exp: Cleanup corefile test name. * gdb.base/annota3.exp: Ditto. --- gdb/testsuite/ChangeLog | 5 +++++ gdb/testsuite/gdb.base/annota1.exp | 18 +++++++++--------- gdb/testsuite/gdb.base/annota3.exp | 18 +++++++++--------- 3 files changed, 23 insertions(+), 18 deletions(-) diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 620d487af5..723a1f2eeb 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,5 +1,10 @@ 2004-07-12 Andrew Cagney + * gdb.base/annota1.exp: Cleanup corefile test name. + * gdb.base/annota3.exp: Ditto. + +2004-07-12 Andrew Cagney + * gdb.base/signals.exp: Clean up copyright, re-indent. * gdb.base/attach.exp: Replace send_gdb and gdb_expect with diff --git a/gdb/testsuite/gdb.base/annota1.exp b/gdb/testsuite/gdb.base/annota1.exp index dc8ba29ca4..0c894df47b 100644 --- a/gdb/testsuite/gdb.base/annota1.exp +++ b/gdb/testsuite/gdb.base/annota1.exp @@ -459,20 +459,20 @@ gdb_expect { } -# Check for production of a core file -# and remove it! +# Check for production of a core file and remove it! set exec_output [remote_exec build "ls core"] +set test "cleanup core file" if [ regexp "core not found" $exec_output] { - pass "No core dumped" + pass "$test (not dumped)" } else { - if [ regexp "No such file or directory" $exec_output] { - pass "No core dumped" - } else { - remote_exec build "rm -f core" - pass "Core dumped and removed" - } + if [ regexp "No such file or directory" $exec_output] { + pass "$test (not dumped)" + } else { + remote_exec build "rm -f core" + pass "$test (removed)" + } } # restore the original prompt for the rest of the testsuite diff --git a/gdb/testsuite/gdb.base/annota3.exp b/gdb/testsuite/gdb.base/annota3.exp index 93086ef609..27c0960417 100644 --- a/gdb/testsuite/gdb.base/annota3.exp +++ b/gdb/testsuite/gdb.base/annota3.exp @@ -387,20 +387,20 @@ gdb_expect_list "signal sent" "$gdb_prompt$" { } -# Check for production of a core file -# and remove it! +# Check for production of a core file and remove it! set exec_output [remote_exec build "ls core"] +set test "cleanup core file" if [ regexp "core not found" $exec_output] { - pass "No core dumped" + pass "$test (not dumped)" } else { - if [ regexp "No such file or directory" $exec_output] { - pass "No core dumped" - } else { - remote_exec build "rm -f core" - pass "Core dumped and removed" - } + if [ regexp "No such file or directory" $exec_output] { + pass "$test (not dumped)" + } else { + remote_exec build "rm -f core" + pass "$test (removed)" + } } # restore the original prompt for the rest of the testsuite -- 2.11.0