diff options
author | J.T. Conklin <jtc@acorntoolworks.com> | 1994-07-19 22:57:49 +0000 |
---|---|---|
committer | J.T. Conklin <jtc@acorntoolworks.com> | 1994-07-19 22:57:49 +0000 |
commit | b34c14fb190bb97d650cecfb9ff3ad0de598a075 (patch) | |
tree | b31473611d180a30509a0b50e7756fb77e1467ae /gdb/testsuite | |
parent | 27b4d34f08d399d0da91cb50ef628e6129171f28 (diff) | |
download | gdb-b34c14fb190bb97d650cecfb9ff3ad0de598a075.zip gdb-b34c14fb190bb97d650cecfb9ff3ad0de598a075.tar.gz gdb-b34c14fb190bb97d650cecfb9ff3ad0de598a075.tar.bz2 |
* lib/gdb.exp (runto): Rewrite in terms of gdb_run_cmd.
Diffstat (limited to 'gdb/testsuite')
-rw-r--r-- | gdb/testsuite/lib/gdb.exp | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp index 2a967a2..664aff2 100644 --- a/gdb/testsuite/lib/gdb.exp +++ b/gdb/testsuite/lib/gdb.exp @@ -159,14 +159,9 @@ proc runto { function } { timeout { fail "setting breakpoint at $function (timeout)" ; return 0 } } - send "run\n" # the "at foo.c:36" output we get with -g. # the "in func" output we get without -g. - expect { - -re "The program .* has been started already.*y or n. $" { - send "y\n" - exp_continue - } + expect_after { -re "Starting.*Break.* at .*:$decimal.*$prompt $" { return 1 } -re "Breakpoint \[0-9\]*, \[0-9xa-f\]* in $function.*$prompt $" { return 1 @@ -174,6 +169,8 @@ proc runto { function } { -re "$prompt $" { fail "running to $function" ; return 0 } timeout { fail "running to $function (timeout)" ; return 0 } } + gdb_run_cmd + expect_after; } # |