diff options
author | Bob Manson <manson@cygnus> | 1997-06-25 16:29:59 +0000 |
---|---|---|
committer | Bob Manson <manson@cygnus> | 1997-06-25 16:29:59 +0000 |
commit | 5e7be5310d90eb5cb98bf93ab710081f5ff576d6 (patch) | |
tree | 9889efc7925ee323cffa5fc1b538b07c8b5b02e7 /gdb/testsuite/lib | |
parent | d05b86b7fbedf99179e079746d1f42f71e34bc14 (diff) | |
download | gdb-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.exp | 12 |
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 } { |