From a6c5f2a922dc430ddb7736839bff5e88abaa6c49 Mon Sep 17 00:00:00 2001 From: Jim Blandy Date: Fri, 13 May 2005 17:36:43 +0000 Subject: * gdb.base/call-ar-st.exp: Call 'untested' and return -1 instead of calling gdb_suppress_entire_file. * gdb.base/charset.exp: Same. * gdb.base/call-rt-st.exp: Same. --- gdb/testsuite/ChangeLog | 7 +++++++ gdb/testsuite/gdb.arch/e500-regs.exp | 10 +++++----- gdb/testsuite/gdb.base/call-ar-st.exp | 3 ++- gdb/testsuite/gdb.base/call-rt-st.exp | 5 +++-- gdb/testsuite/gdb.base/charset.exp | 3 ++- 5 files changed, 19 insertions(+), 9 deletions(-) diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 39705930682..29c0a6ff7da 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,10 @@ +2005-05-13 Jim Blandy + + * gdb.base/call-ar-st.exp: Call 'untested' and return -1 instead of + calling gdb_suppress_entire_file. + * gdb.base/charset.exp: Same. + * gdb.base/call-rt-st.exp: Same. + 2005-05-05 Bob Rossi * lib/gdb.exp (fullname_syntax): Added global regex. diff --git a/gdb/testsuite/gdb.arch/e500-regs.exp b/gdb/testsuite/gdb.arch/e500-regs.exp index 30dae0a15f7..690e0c3933b 100644 --- a/gdb/testsuite/gdb.arch/e500-regs.exp +++ b/gdb/testsuite/gdb.arch/e500-regs.exp @@ -32,7 +32,7 @@ if $tracelevel then { set prms_id 0 set bug_id 0 -if ![istarget "powerpc-*eabispe"] then { +if ![istarget "powerpc-*"] then { verbose "Skipping e500 register tests." return } @@ -85,9 +85,9 @@ gdb_expect { # b) the register read (below) also works. if {$endianness == "big"} { -set vector_register ".uint64 = 0x100000001, v2_float = .0x0, 0x0., v2_int32 = .0x1, 0x1., v4_int16 = .0x0, 0x1, 0x0, 0x1., v8_int8 = .0x0, 0x0, 0x0, 0x1, 0x0, 0x0, 0x0, 0x1.." +set vector_register ".uint64 = 0x100000001, dbl = 0x0, v2_float = .0x0, 0x0., v2_int32 = .0x1, 0x1., v4_int16 = .0x0, 0x1, 0x0, 0x1., v8_int8 = .0x0, 0x0, 0x0, 0x1, 0x0, 0x0, 0x0, 0x1.." } else { -set vector_register ".uint64 = 0x100000001, v2_float = .0x0, 0x0., v2_int32 = .0x1, 0x1., v4_int16 = .0x1, 0x0, 0x1, 0x0., v8_int8 = .0x1, 0x0, 0x0, 0x0, 0x1, 0x0, 0x0, 0x0.." +set vector_register ".uint64 = 0x100000001, dbl = 0x0, v2_float = .0x0, 0x0., v2_int32 = .0x1, 0x1., v4_int16 = .0x1, 0x0, 0x1, 0x0., v8_int8 = .0x1, 0x0, 0x0, 0x0, 0x1, 0x0, 0x0, 0x0.." } for {set i 0} {$i < 32} {incr i 1} { @@ -110,9 +110,9 @@ for {set i 0} {$i < 32} {incr i 1} { # the way gdb works. if {$endianness == "big"} { - set decimal_vector ".uint64 = 4294967297, v2_float = .1.*e-45, 1.*e-45., v2_int32 = .1, 1., v4_int16 = .0, 1, 0, 1., v8_int8 = ..000.000.000.001.000.000.000.001.." + set decimal_vector ".uint64 = 4294967297, dbl = 0, v2_float = .1.*e-45, 1.*e-45., v2_int32 = .1, 1., v4_int16 = .0, 1, 0, 1., v8_int8 = ..000.000.000.001.000.000.000.001.." } else { - set decimal_vector ".uint64 = 4294967297, v2_float = .1.*e-45, 1.*e-45., v2_int32 = .1, 1., v4_int16 = .1, 0, 1, 0., v8_int8 = ..001.000.000.000.001.000.000.." + set decimal_vector ".uint64 = 4294967297, dbl = 0, v2_float = .1.*e-45, 1.*e-45., v2_int32 = .1, 1., v4_int16 = .1, 0, 1, 0., v8_int8 = ..001.000.000.000.001.000.000.." } for {set i 0} {$i < 32} {incr i 1} { diff --git a/gdb/testsuite/gdb.base/call-ar-st.exp b/gdb/testsuite/gdb.base/call-ar-st.exp index 9b0e5398a2f..2a5a55b89de 100644 --- a/gdb/testsuite/gdb.base/call-ar-st.exp +++ b/gdb/testsuite/gdb.base/call-ar-st.exp @@ -38,7 +38,8 @@ if { [istarget "sparclet-*-*"] } { } if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } { - gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail." + untested "couldn't compile ${srcdir}/${subdir}/${srcfile}" + return -1 } diff --git a/gdb/testsuite/gdb.base/call-rt-st.exp b/gdb/testsuite/gdb.base/call-rt-st.exp index 7152a4a1d7f..7e94408a53d 100644 --- a/gdb/testsuite/gdb.base/call-rt-st.exp +++ b/gdb/testsuite/gdb.base/call-rt-st.exp @@ -43,8 +43,9 @@ if { [istarget "sparclet-*-*"] } { } if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug additional_flags=-w}] != "" } { - gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail." - } + untested "couldn't compile ${srcdir}/${subdir}/${srcfile}" + return -1 +} diff --git a/gdb/testsuite/gdb.base/charset.exp b/gdb/testsuite/gdb.base/charset.exp index 588bf059c77..212f3b3c509 100644 --- a/gdb/testsuite/gdb.base/charset.exp +++ b/gdb/testsuite/gdb.base/charset.exp @@ -32,7 +32,8 @@ set testfile "charset" set srcfile ${testfile}.c set binfile ${objdir}/${subdir}/${testfile} if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } { - gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail." + untested "couldn't compile ${srcdir}/${subdir}/${srcfile}" + return -1 } # Start with a fresh gdb. -- cgit v1.2.1