diff options
author | Michael Chastain <mec@google.com> | 2001-03-16 20:04:02 +0000 |
---|---|---|
committer | Michael Chastain <mec@google.com> | 2001-03-16 20:04:02 +0000 |
commit | f266096bea451f461f8c641088ef6a12219c62da (patch) | |
tree | ba5e33babf71756993bddb737d56466ad06f2e2a | |
parent | cac3c2ff1143b3803aafc26cc815ddd98f85faee (diff) | |
download | gdb-f266096bea451f461f8c641088ef6a12219c62da.zip gdb-f266096bea451f461f8c641088ef6a12219c62da.tar.gz gdb-f266096bea451f461f8c641088ef6a12219c62da.tar.bz2 |
2001-03-12 Michael Chastain <chastain@redhat.com>
* gdb.c++/derivation.exp: Use the 'runto' library function.
-rw-r--r-- | gdb/testsuite/ChangeLog | 4 | ||||
-rw-r--r-- | gdb/testsuite/gdb.c++/derivation.exp | 27 |
2 files changed, 11 insertions, 20 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index f4086d8..06fcb63 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,5 +1,9 @@ 2001-03-12 Michael Chastain <chastain@redhat.com> + * gdb.c++/derivation.exp: Use the 'runto' library function. + +2001-03-12 Michael Chastain <chastain@redhat.com> + * gdb.c++/annota2.exp: Fix regular expression for "post-query". 2001-02-24 Michael Chastain <chastain@redhat.com> diff --git a/gdb/testsuite/gdb.c++/derivation.exp b/gdb/testsuite/gdb.c++/derivation.exp index 00df5c0..13501f2 100644 --- a/gdb/testsuite/gdb.c++/derivation.exp +++ b/gdb/testsuite/gdb.c++/derivation.exp @@ -1,4 +1,4 @@ -# Copyright 1998, 1999, 2000 Free Software Foundation, Inc. +# Copyright 1998, 1999, 2000, 2001 Free Software Foundation, Inc. # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by @@ -69,25 +69,12 @@ if ![runto_main] then { continue } -send_gdb "break marker1\n" ; gdb_expect -re ".*$gdb_prompt $" - - send_gdb "cont\n" - gdb_expect { - -re "Break.* marker1 \\(\\) at .*:$decimal.*$gdb_prompt $" { - send_gdb "up\n" - gdb_expect { - -re ".*main.*$gdb_prompt $" { - pass "up from marker1" - } - -re ".*$gdb_prompt $" { - fail "up from marker1" - } - timeout { fail "up from marker1 (timeout)" } - } - } - -re "$gdb_prompt $" { fail "continue to marker1" } - timeout { fail "(timeout) continue to marker1" } - } +if ![runto 'marker1'] then { + perror "couldn't run to marker1" + continue +} + +gdb_test "up" ".*main.*" "up from marker1" |