espressif/binutils-gdb
1
0
Fork 0
mirror of https://github.com/espressif/binutils-gdb.git synced 2025-06-24 04:00:07 +08:00
Code Issues Packages Projects Releases Wiki Activity

Tweaked to work with either version of expect.

Browse Source
This commit is contained in:
Rob Savoye
1994-01-06 05:43:20 +00:00
parent 3107eb5b38
commit 70dbc7514f
1 changed files with 6 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
gdb/testsuite/config/unix-gdb.exp
View File

@ -24,7 +24,7 @@ load_lib gdb.exp
# variables that need to set up # variables that need to set up
# #
if ![info exists prompt] then { if ![info exists prompt] then {
set prompt "\(gdb\)" set prompt "\[(\]gdb\[)\]"
} }
# some convenience abbreviations # some convenience abbreviations
# #
@ -98,9 +98,7 @@ proc gdb_start {} {
global prompt global prompt
global spawn_id global spawn_id
global timeout global timeout
if $verbose>1 then { verbose "Spawning $GDB $GDBFLAGS"
send_user "Spawning $GDB $GDBFLAGS\n"
}
set oldtimeout $timeout set oldtimeout $timeout
set timeout [expr "$timeout + 60"] set timeout [expr "$timeout + 60"]
@ -120,10 +118,8 @@ proc gdb_start {} {
} }
} }
expect { expect {
-re ".*$prompt $" { -re ".*\r\n$prompt $" {
if $verbose>1 then { verbose "GDB initialized for native mode"
send_user "GDB initialized for native mode\n"
}
} }
-re "$prompt $" { -re "$prompt $" {
perror "GDB never initialized." perror "GDB never initialized."
@ -139,7 +135,7 @@ proc gdb_start {} {
send "set height 0\n" send "set height 0\n"
expect { expect {
-re ".*$prompt $" { -re ".*$prompt $" {
verbose "Seting height to 0." verbose "Setting height to 0." 2
} }
timeout { timeout {
warning "Couldn't set the height to 0." warning "Couldn't set the height to 0."
@ -149,9 +145,7 @@ proc gdb_start {} {
send "set width 0\n" send "set width 0\n"
expect { expect {
-re ".*$prompt $" { -re ".*$prompt $" {
if $verbose>2 then { verbose "Seting width to 0." 2
send_user "Seting width to 0.\n"
}
} }
timeout { timeout {
warning "Couldn't set the width to 0." warning "Couldn't set the width to 0."