* gdb.base/structs.exp: Use i*86-*-* instead of i686-*-* as a
pattern for the KFAILs.
This commit is contained in:
parent
efb1c01c42
commit
e8367dc76a
2 changed files with 13 additions and 8 deletions
|
@ -1,3 +1,8 @@
|
||||||
|
2003-11-27 Mark Kettenis <kettenis@gnu.org>
|
||||||
|
|
||||||
|
* gdb.base/structs.exp: Use i*86-*-* instead of i686-*-* as a
|
||||||
|
pattern for the KFAILs.
|
||||||
|
|
||||||
2003-11-25 Adam Fedor <fedor@gnu.org>
|
2003-11-25 Adam Fedor <fedor@gnu.org>
|
||||||
|
|
||||||
* gdb.objc/objcdecode.exp: Test for PR objc/1238.
|
* gdb.objc/objcdecode.exp: Test for PR objc/1238.
|
||||||
|
|
|
@ -217,8 +217,8 @@ proc test_struct_calls { n } {
|
||||||
set tests "call $n ${testfile}"
|
set tests "call $n ${testfile}"
|
||||||
|
|
||||||
# Call fun${n}, checking the printed return-value.
|
# Call fun${n}, checking the printed return-value.
|
||||||
setup_kfails structs-*tld* i686-*-* gdb/1447
|
setup_kfails structs-*tld* i*86-*-* gdb/1447
|
||||||
setup_compiler_kfails structs-tc-* gcc-3-3 "DWARF 2" i686-*-* gdb/1455
|
setup_compiler_kfails structs-tc-* gcc-3-3 "DWARF 2" i*86-*-* gdb/1455
|
||||||
gdb_test "p/c fun${n}()" "[foo ${n}]" "p/c fun<n>(); ${tests}"
|
gdb_test "p/c fun${n}()" "[foo ${n}]" "p/c fun<n>(); ${tests}"
|
||||||
|
|
||||||
# Check that GDB can always pass a structure to an inferior function.
|
# Check that GDB can always pass a structure to an inferior function.
|
||||||
|
@ -229,8 +229,8 @@ proc test_struct_calls { n } {
|
||||||
# examining that global to confirm that the value is as expected.
|
# examining that global to confirm that the value is as expected.
|
||||||
|
|
||||||
gdb_test "call Fun${n}(foo${n})" "" "call Fun<n>(foo<n>); ${tests}"
|
gdb_test "call Fun${n}(foo${n})" "" "call Fun<n>(foo<n>); ${tests}"
|
||||||
setup_kfails structs-*tld* i686-*-* gdb/1447
|
setup_kfails structs-*tld* i*86-*-* gdb/1447
|
||||||
setup_compiler_kfails structs-tc-* gcc-3-3 "DWARF 2" i686-*-* gdb/1455
|
setup_compiler_kfails structs-tc-* gcc-3-3 "DWARF 2" i*86-*-* gdb/1455
|
||||||
gdb_test "p/c L${n}" [foo ${n}] "p/c L<n>; ${tests}"
|
gdb_test "p/c L${n}" [foo ${n}] "p/c L<n>; ${tests}"
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -283,7 +283,7 @@ proc test_struct_returns { n } {
|
||||||
"advance to fun<n> for return; ${tests}"
|
"advance to fun<n> for return; ${tests}"
|
||||||
|
|
||||||
# Check that the program invalidated the relevant global.
|
# Check that the program invalidated the relevant global.
|
||||||
setup_kfails structs-tld i686-*-* gdb/1447
|
setup_kfails structs-tld i*86-*-* gdb/1447
|
||||||
gdb_test "p/c L${n}" " = [zed $n]" "zed L<n> for return; ${tests} .${testfile}."
|
gdb_test "p/c L${n}" " = [zed $n]" "zed L<n> for return; ${tests} .${testfile}."
|
||||||
|
|
||||||
# Force the "return". This checks that the return is always
|
# Force the "return". This checks that the return is always
|
||||||
|
@ -331,7 +331,7 @@ proc test_struct_returns { n } {
|
||||||
# "return_value_unknown" set above.
|
# "return_value_unknown" set above.
|
||||||
|
|
||||||
set test "value foo<n> returned; ${tests}"
|
set test "value foo<n> returned; ${tests}"
|
||||||
setup_kfails structs-*tld* i686-*-* gdb/1447
|
setup_kfails structs-*tld* i*86-*-* gdb/1447
|
||||||
gdb_test_multiple "p/c L${n}" "${test}" {
|
gdb_test_multiple "p/c L${n}" "${test}" {
|
||||||
-re " = [foo ${n}].*${gdb_prompt} $" {
|
-re " = [foo ${n}].*${gdb_prompt} $" {
|
||||||
if $return_value_unknown {
|
if $return_value_unknown {
|
||||||
|
@ -373,7 +373,7 @@ proc test_struct_returns { n } {
|
||||||
"advance to fun<n> for finish; ${tests}"
|
"advance to fun<n> for finish; ${tests}"
|
||||||
|
|
||||||
# Check that the program invalidated the relevant global.
|
# Check that the program invalidated the relevant global.
|
||||||
setup_kfails structs-tld i686-*-* gdb/1447
|
setup_kfails structs-tld i*86-*-* gdb/1447
|
||||||
gdb_test "p/c L${n}" " = [zed $n]" "zed L<n> for finish; ${tests}"
|
gdb_test "p/c L${n}" " = [zed $n]" "zed L<n> for finish; ${tests}"
|
||||||
|
|
||||||
# Finish the function, set 'finish_value_unknown" to non-empty if the
|
# Finish the function, set 'finish_value_unknown" to non-empty if the
|
||||||
|
@ -395,7 +395,7 @@ proc test_struct_returns { n } {
|
||||||
# "p/c". If no return value was found, the 'Z' from the previous
|
# "p/c". If no return value was found, the 'Z' from the previous
|
||||||
# check that the variable was cleared, is printed.
|
# check that the variable was cleared, is printed.
|
||||||
set test "value foo<n> finished; ${tests}"
|
set test "value foo<n> finished; ${tests}"
|
||||||
setup_kfails structs-*tld* i686-*-* gdb/1447
|
setup_kfails structs-*tld* i*86-*-* gdb/1447
|
||||||
gdb_test_multiple "p/c" "${test}" {
|
gdb_test_multiple "p/c" "${test}" {
|
||||||
-re "[foo ${n}]\[\r\n\]+${gdb_prompt} $" {
|
-re "[foo ${n}]\[\r\n\]+${gdb_prompt} $" {
|
||||||
if $finish_value_unknown {
|
if $finish_value_unknown {
|
||||||
|
|
Loading…
Reference in a new issue