Make gdb.base/sizeof.exp use gdb_test_stdio

gdb/testsuite/ChangeLog:
2015-07-29  Pedro Alves  <palves@redhat.com>

	* gdb.base/sizeof.exp (check_sizeof, check_valueof): Use
	gdb_test_stdio.
This commit is contained in:
Pedro Alves 2015-07-29 11:09:38 +01:00
parent 188a61b440
commit 8aed9555b2
2 changed files with 13 additions and 4 deletions

View File

@ -1,3 +1,8 @@
2015-07-29 Pedro Alves <palves@redhat.com>
* gdb.base/sizeof.exp (check_sizeof, check_valueof): Use
gdb_test_stdio.
2015-07-29 Pedro Alves <palves@redhat.com>
* lib/gdb.exp (gdb_test_stdio): New procedure.

View File

@ -70,8 +70,10 @@ set sizeof_long_double [get_sizeof "long double" 8]
proc check_sizeof { type size } {
global gdb_prompt
set pat [string_to_regexp "sizeof (${type}) == ${size}"]
gdb_test "next" "${pat}\[\r\n\]+\[0-9\].*" "check sizeof \"$type\""
set pat [string_to_regexp "sizeof (${type}) == ${size}\r\n"]
gdb_test_stdio "next" "${pat}" \
"\[0-9\].*" \
"check sizeof \"$type\""
}
check_sizeof "char" ${sizeof_char}
@ -90,8 +92,10 @@ check_sizeof "long double" ${sizeof_long_double}
proc check_valueof { exp val } {
global gdb_prompt
set pat [string_to_regexp "valueof (${exp}) == ${val}"]
gdb_test "next" "${pat}\[\r\n\]+\[0-9\].*" "check valueof \"$exp\""
set pat [string_to_regexp "valueof (${exp}) == ${val}\r\n"]
gdb_test_stdio "next" "${pat}" \
"\[0-9\].*" \
"check valueof \"$exp\""
}
# Check that GDB and the target agree over the sign of a character.