aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/lib
diff options
context:
space:
mode:
authorBob Manson <manson@cygnus>1997-06-25 16:29:59 +0000
committerBob Manson <manson@cygnus>1997-06-25 16:29:59 +0000
commit5e7be5310d90eb5cb98bf93ab710081f5ff576d6 (patch)
tree9889efc7925ee323cffa5fc1b538b07c8b5b02e7 /gdb/testsuite/lib
parentd05b86b7fbedf99179e079746d1f42f71e34bc14 (diff)
downloadgdb-5e7be5310d90eb5cb98bf93ab710081f5ff576d6.zip
gdb-5e7be5310d90eb5cb98bf93ab710081f5ff576d6.tar.gz
gdb-5e7be5310d90eb5cb98bf93ab710081f5ff576d6.tar.bz2
* lib/gdb.exp(default_gdb_exit): Don't give an error if the remote
host doesn't have a currently-open connection. * config/sparclet.exp: Cleanups and fixes to make it generic for any gdb stub target. Handle cases where gdb doesn't respond when interrupted in a sane fashion. * config/m32r.exp: Load sparclet.exp instead of trying to do the same thing in a totally different way. * config/monitor.exp: Pass in timeouts to gdb_expect instead of setting "timeout". (gdb_start): We set the global gdb_prompt variable in default_gdb_init now.
Diffstat (limited to 'gdb/testsuite/lib')
-rw-r--r--gdb/testsuite/lib/gdb.exp12
1 files changed, 9 insertions, 3 deletions
diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp
index 2e0a305..0065332 100644
--- a/gdb/testsuite/lib/gdb.exp
+++ b/gdb/testsuite/lib/gdb.exp
@@ -601,14 +601,14 @@ proc default_gdb_exit {} {
verbose "Quitting $GDB $GDBFLAGS"
- if [is_remote host] {
+ if { [is_remote host] && [board_info host exists fileid] } {
send_gdb "quit\n";
gdb_expect 10 {
- -re "and kill it.*y or n. " {
+ -re "and kill it.*y or n. " {
send_gdb "y\n";
exp_continue;
}
- timeout { }
+ default { }
}
}
@@ -949,6 +949,12 @@ proc default_gdb_init { args } {
set pf_prefix "[file tail [file dirname $file]]/[file tail $file]:";
}
+ global gdb_prompt;
+ if [target_info exists gdb_prompt] {
+ set gdb_prompt [target_info gdb_prompt];
+ } else {
+ set gdb_prompt "\\(gdb\\)"
+ }
}
proc gdb_init { args } {