diff options
Diffstat (limited to 'gdb/testsuite/gdb.base/constvars.exp')
| -rw-r--r-- | gdb/testsuite/gdb.base/constvars.exp | 13 |
1 files changed, 12 insertions, 1 deletions
diff --git a/gdb/testsuite/gdb.base/constvars.exp b/gdb/testsuite/gdb.base/constvars.exp index d58b9b6..8a6b60b 100644 --- a/gdb/testsuite/gdb.base/constvars.exp +++ b/gdb/testsuite/gdb.base/constvars.exp @@ -84,7 +84,7 @@ get_debug_format proc local_compiler_xfail_check { } { global gcc_compiled; - if {$gcc_compiled} then { + if {$gcc_compiled == 2} then { if { ![test_debug_format "HP"] \ && ![test_debug_format "DWARF 2"] } then { setup_xfail "*-*-*" @@ -128,6 +128,10 @@ send_gdb "break marker1\n" ; gdb_expect -re ".*$gdb_prompt $" # test function parameters local_compiler_xfail_check +if {$gcc_compiled == 3 && [test_debug_format "stabs"]} then { + # With stabs, even GCC 3 does not get the const char arguments correct. + setup_xfail "*-*-*" +} send_gdb "ptype qux1\n" gdb_expect { -re "type = int \\(const char, const char, const char \\*, char \\* const\\).*$gdb_prompt $" { @@ -140,6 +144,8 @@ gdb_expect { # test vars and pointers proc do_constvar_tests {} { + global gcc_compiled + gdb_test "print lave" " = 66 'B'" gdb_test "ptype lave" "type = char" gdb_test "print lavish" " = 10 '\\\\n'" @@ -279,6 +285,11 @@ proc do_constvar_tests {} { gdb_test "ptype locust" "type = double \\* const" local_compiler_xfail_check + if {$gcc_compiled == 3 && [test_debug_format "stabs"]} then { + # With stabs, even GCC 3 does not get the constant structure member + # correct. + setup_xfail "*-*-*" + } gdb_test "ptype crass" "type = struct crass \{\[\r\n\]+\[\ \t\]+char \\* const ptr;\[\r\n\]+\}" local_compiler_xfail_check gdb_test "ptype crisp" "type = struct crisp \{\[\r\n\]+\[\ \t\]+char \\* const \\*ptr;\[\r\n\]+\}" |