2004-06-09 Andrew Cagney <cagney@gnu.org>
* gdb.base/structs.exp (test_struct_returns, test_struct_returns) (test_struct_calls): Remove KFAIL of "long double" on i*86-*-*, x86_64-*-*, sparc64-*-*, and sparc*-*-solaris2*. PR tdep/1447 fixed.
This commit is contained in:
parent
a9b881beb1
commit
dc3f10cb1a
@ -1,3 +1,10 @@
|
||||
2004-06-09 Andrew Cagney <cagney@gnu.org>
|
||||
|
||||
* gdb.base/structs.exp (test_struct_returns, test_struct_returns)
|
||||
(test_struct_calls): Remove KFAIL of "long double" on i*86-*-*,
|
||||
x86_64-*-*, sparc64-*-*, and sparc*-*-solaris2*. PR tdep/1447
|
||||
fixed.
|
||||
|
||||
2004-06-09 Andrew Cagney <cagney@gnu.org>
|
||||
|
||||
* gdb.base/structs.exp (test_struct_returns): Replace
|
||||
|
@ -218,10 +218,6 @@ proc test_struct_calls { n } {
|
||||
set tests "call $n ${testfile}"
|
||||
|
||||
# Call fun${n}, checking the printed return-value.
|
||||
setup_kfails structs-*tld* i*86-*-* gdb/1447
|
||||
setup_kfails structs-*tld* sparc64-*-* gdb/1447
|
||||
setup_kfails structs-*tld* sparc*-*-solaris2* gdb/1447
|
||||
setup_kfails structs-*tld* x86_64-*-* gdb/1447
|
||||
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}"
|
||||
|
||||
@ -233,10 +229,6 @@ proc test_struct_calls { n } {
|
||||
# examining that global to confirm that the value is as expected.
|
||||
|
||||
gdb_test "call Fun${n}(foo${n})" "" "call Fun<n>(foo<n>); ${tests}"
|
||||
setup_kfails structs-*tld* i*86-*-* gdb/1447
|
||||
setup_kfails structs-*tld* sparc64-*-* gdb/1447
|
||||
setup_kfails structs-*tld* sparc*-*-solaris2* gdb/1447
|
||||
setup_kfails structs-*tld* x86_64-*-* gdb/1447
|
||||
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}"
|
||||
}
|
||||
@ -290,10 +282,6 @@ proc test_struct_returns { n } {
|
||||
"advance to fun<n> for return; ${tests}"
|
||||
|
||||
# Check that the program invalidated the relevant global.
|
||||
setup_kfails structs-tld i*86-*-* gdb/1447
|
||||
setup_kfails structs-tld sparc64-*-* gdb/1447
|
||||
setup_kfails structs-tld sparc*-*-solaris2* gdb/1447
|
||||
setup_kfails structs-tld x86_64-*-* gdb/1447
|
||||
gdb_test "p/c L${n}" " = [zed $n]" "zed L<n> for return; ${tests}"
|
||||
|
||||
# Force the "return". This checks that the return is always
|
||||
@ -342,10 +330,6 @@ proc test_struct_returns { n } {
|
||||
# "return_value_known" set above.
|
||||
|
||||
set test "value foo<n> returned; ${tests}"
|
||||
setup_kfails structs-*tld* i*86-*-* gdb/1447
|
||||
setup_kfails structs-*tld* sparc64-*-* gdb/1447
|
||||
setup_kfails structs-*tld* sparc*-*-solaris2* gdb/1447
|
||||
setup_kfails structs-*tld* x86_64-*-* gdb/1447
|
||||
gdb_test_multiple "p/c L${n}" "${test}" {
|
||||
-re " = [foo ${n}].*${gdb_prompt} $" {
|
||||
if $return_value_known {
|
||||
@ -396,10 +380,6 @@ proc test_struct_returns { n } {
|
||||
"advance to fun<n> for finish; ${tests}"
|
||||
|
||||
# Check that the program invalidated the relevant global.
|
||||
setup_kfails structs-tld i*86-*-* gdb/1447
|
||||
setup_kfails structs-tld sparc64-*-* gdb/1447
|
||||
setup_kfails structs-tld sparc*-*-solaris2* gdb/1447
|
||||
setup_kfails structs-tld x86_64-*-* gdb/1447
|
||||
gdb_test "p/c L${n}" " = [zed $n]" "zed L<n> for finish; ${tests}"
|
||||
|
||||
# Finish the function, set 'finish_value_known" to non-empty if
|
||||
@ -422,10 +402,6 @@ proc test_struct_returns { n } {
|
||||
# "p/c". If no return value was found, the 'Z' from the previous
|
||||
# check that the variable was cleared, is printed.
|
||||
set test "value foo<n> finished; ${tests}"
|
||||
setup_kfails structs-*tld* i*86-*-* gdb/1447
|
||||
setup_kfails structs-*tld* sparc64-*-* gdb/1447
|
||||
setup_kfails structs-*tld* sparc*-*-solaris2* gdb/1447
|
||||
setup_kfails structs-*tld* x86_64-*-* gdb/1447
|
||||
gdb_test_multiple "p/c" "${test}" {
|
||||
-re "[foo ${n}]\[\r\n\]+${gdb_prompt} $" {
|
||||
if $finish_value_known {
|
||||
|
Loading…
x
Reference in New Issue
Block a user