diff options
author | Jim Kingdon <jkingdon@engr.sgi.com> | 1995-01-11 20:42:33 +0000 |
---|---|---|
committer | Jim Kingdon <jkingdon@engr.sgi.com> | 1995-01-11 20:42:33 +0000 |
commit | 4a2170f0eafa77800008536294b63a0ffe785fff (patch) | |
tree | 4aaea8851c33b70ace15a5ca5a4520d7783be04b /gdb | |
parent | 788d94361ffd13213d6fdb80f6a7a0a32c92720d (diff) | |
download | gdb-4a2170f0eafa77800008536294b63a0ffe785fff.zip gdb-4a2170f0eafa77800008536294b63a0ffe785fff.tar.gz gdb-4a2170f0eafa77800008536294b63a0ffe785fff.tar.bz2 |
* gdb.base/a1-selftest.exp: Don't test "maint dump-me". That test
was a vestige of the manual TESTSTRATEGY, and the purpose of it
was to make sure that gdb can read a core file. But (a) the "read
the corefile" part didn't make it to a1-selftest.exp, we just
delete the corefile after creating it, and (b) we test reading
corefiles in corefile.exp anyway. Also, this test left around a
xgdb process on Solaris.
* gdb.base/corefile.exp: Also test backtrace.
Diffstat (limited to 'gdb')
-rw-r--r-- | gdb/testsuite/ChangeLog | 12 | ||||
-rw-r--r-- | gdb/testsuite/gdb.base/a1-selftest.exp | 37 |
2 files changed, 14 insertions, 35 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 32bc389..afc65c6 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,15 @@ +Wed Jan 11 14:37:04 1995 Jim Kingdon <kingdon@lioth.cygnus.com> + + * gdb.base/a1-selftest.exp: Don't test "maint dump-me". That test + was a vestige of the manual TESTSTRATEGY, and the purpose of it + was to make sure that gdb can read a core file. But (a) the "read + the corefile" part didn't make it to a1-selftest.exp, we just + delete the corefile after creating it, and (b) we test reading + corefiles in corefile.exp anyway. Also, this test left around a + xgdb process on Solaris. + + * gdb.base/corefile.exp: Also test backtrace. + Wed Jan 11 00:14:40 1995 Jeff Law (law@snake.cs.utah.edu) * gdb.base/commands.exp: Test a simple user defined command with diff --git a/gdb/testsuite/gdb.base/a1-selftest.exp b/gdb/testsuite/gdb.base/a1-selftest.exp index 6e4e2ea..5b18146 100644 --- a/gdb/testsuite/gdb.base/a1-selftest.exp +++ b/gdb/testsuite/gdb.base/a1-selftest.exp @@ -449,41 +449,8 @@ GDB.*Copyright \[0-9\]+ Free Software Foundation, Inc..*$prompt $"\ fail "$description (timeout)" } } - - # force GDB to dump core. On Solaris expect seems to not see the - # final message, even if gdb did dump core, so we check for the - # core dump explicitly if we time out. - # - # Some systems append "core" to the name of the program; others - # append the name of the program to "core". - system rm -f core core.gdb gdb.core - send "maint dump-me\n" - expect { - -re "maint dump-me.*Should GDB dump core.*y or n. $" { - send "y\n" - expect { - -re "Quit.*core dumped.*" { pass "GDB dumped core" } - -re "Program received signal SIGQUIT.*$prompt $" { - pass "GDB dumped core" - # This means we just told xgdb, not gdb, to dump core. - # Get out of gdb so that removing xgdb doesn't get - # test busy errors. - gdb_exit - } - -re "$prompt $" { fail "GDB dumped core" } - default { - if {[file exists core] || [file exists core.gdb] || [file exists gdb.core]} then { - pass "GDB dumped core" - } else { - fail "GDB dumped core" - } - } - } - } - -re ".*$prompt $" { fail "GDB dumped core" } - timeout { fail "(timeout) GDB dumped core" } - } - system rm -f core core.gdb gdb.core + + gdb_exit # Set the timeout back to the value it had when we were called. set timeout $oldtimeout |