2001-02-24 Michael Chastain <chastain@redhat.com>

* gdb.c++/ref-types.exp: Change handwritten code to library
	function 'runto'.
This commit is contained in:
Michael Chastain 2001-03-16 17:59:58 +00:00
parent d165939296
commit b6c11a24b3
2 changed files with 39 additions and 77 deletions

View file

@ -1,3 +1,8 @@
2001-02-24 Michael Chastain <chastain@redhat.com>
* gdb.c++/ref-types.exp: Change handwritten code to library
function 'runto'.
2001-03-16 Orjan Friberg <orjanf@axis.com>
* gdb.base/signals.exp: Set count to 0 explicitly.

View file

@ -54,26 +54,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 1"
proc gdb_start_again {} {
global srcdir
@ -96,28 +82,13 @@ 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 2"
}
@ -290,26 +261,12 @@ gdb_expect {
}
send_gdb "break f\n" ; gdb_expect -re ".*$gdb_prompt $"
send_gdb "cont\n"
gdb_expect {
-re "Break.* f \\(\\) at .*:$decimal.*$gdb_prompt $" {
send_gdb "up\n"
gdb_expect {
-re ".*main2.*$gdb_prompt $" {
pass "up from f"
}
-re ".*$gdb_prompt $" {
fail "up from f"
}
timeout { fail "up from f (timeout)" }
}
}
-re "$gdb_prompt $" { fail "continue to f" }
timeout { fail "(timeout) continue to f" }
if ![runto 'f'] then {
perror "couldn't run to f"
continue
}
gdb_test "up" ".main2.*" "up from f"
send_gdb "print C\n"
gdb_expect {