* gdb.base/Makefile.in: Added support for systems that name core
files by appending "core" to the program name. * gdb.base/a1-selftest.exp: Likewise.
This commit is contained in:
parent
a4ae37021c
commit
29a3db493f
2 changed files with 12 additions and 4 deletions
|
@ -1,3 +1,9 @@
|
|||
Tue Jul 12 12:22:32 1994 J.T. Conklin (jtc@phishhead.cygnus.com)
|
||||
|
||||
* gdb.base/Makefile.in: Added support for systems that name core
|
||||
files by appending "core" to the program name.
|
||||
* gdb.base/a1-selftest.exp: Likewise.
|
||||
|
||||
Mon Jul 11 23:59:18 1994 Peter Schauer (pes@regent.e-technik.tu-muenchen.de)
|
||||
|
||||
* gdb.base/return.exp: Add comment and message for `return double'
|
||||
|
|
|
@ -429,8 +429,10 @@ GDB.*Copyright \[0-9\]+ Free Software Foundation, Inc..*$prompt $"\
|
|||
# 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.
|
||||
# bsd 386 systems append the name of the program to the corefile name.
|
||||
system rm -f core core.gdb
|
||||
#
|
||||
# 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. $" {
|
||||
|
@ -446,7 +448,7 @@ GDB.*Copyright \[0-9\]+ Free Software Foundation, Inc..*$prompt $"\
|
|||
}
|
||||
-re "$prompt $" { fail "GDB dumped core" }
|
||||
default {
|
||||
if {[file exists core] || [file exists core.gdb]} then {
|
||||
if {[file exists core] || [file exists core.gdb] || [file exists gdb.core]} then {
|
||||
pass "GDB dumped core"
|
||||
} else {
|
||||
fail "GDB dumped core"
|
||||
|
@ -457,7 +459,7 @@ GDB.*Copyright \[0-9\]+ Free Software Foundation, Inc..*$prompt $"\
|
|||
-re ".*$prompt $" { fail "GDB dumped core" }
|
||||
timeout { fail "(timeout) GDB dumped core" }
|
||||
}
|
||||
system rm -f core core.gdb
|
||||
system rm -f core core.gdb gdb.core
|
||||
|
||||
# Set the timeout back to the value it had when we were called.
|
||||
set timeout $oldtimeout
|
||||
|
|
Loading…
Add table
Reference in a new issue