From fedfc8e66549465f4b03bf484b84f7547c96a6ee Mon Sep 17 00:00:00 2001 From: Michael Snyder Date: Wed, 8 May 2002 21:05:44 +0000 Subject: 2002-05-08 Michael Snyder * gdb.base/long_long.exp: Merge clauses for arm and xscale. * gdb.base/default.exp: Merge clauses for arm, strongarm, xscale. --- gdb/testsuite/ChangeLog | 5 +++++ gdb/testsuite/gdb.base/default.exp | 10 +++------- gdb/testsuite/gdb.base/long_long.exp | 25 ++++++++----------------- 3 files changed, 16 insertions(+), 24 deletions(-) (limited to 'gdb') diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 34c4a23..ff75483 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2002-05-08 Michael Snyder + + * gdb.base/long_long.exp: Merge clauses for arm and xscale. + * gdb.base/default.exp: Merge clauses for arm, strongarm, xscale. + 2002-05-06 Michael Snyder * lib/gdb.exp (gdb_test): Add case to allow for status wrapper. diff --git a/gdb/testsuite/gdb.base/default.exp b/gdb/testsuite/gdb.base/default.exp index 09b65a9..ea8ba50 100644 --- a/gdb/testsuite/gdb.base/default.exp +++ b/gdb/testsuite/gdb.base/default.exp @@ -320,13 +320,9 @@ gdb_test "info frame" "No stack.|No selected frame." "info frame" #test info files gdb_test "info files" "" "info files" #test info float -if [istarget "arm*-*-*"] then { - gdb_test "info float" "Software FPU type.*mask:.*flags:.*" "info float" -} elseif [istarget "xscale*-*-*"] then { - gdb_test "info float" "Software FPU type.*mask:.*flags:.*" "info float" -} elseif [istarget "thumb*-*-*"] then { - gdb_test "info float" "Software FPU type.*mask:.*flags:.*" "info float" -} elseif [istarget "strongarm*-*-*"] then { +if { [istarget "arm*-*-*"] || \ + [istarget "xscale*-*-*"] || \ + [istarget "strongarm*-*-*"] } then { gdb_test "info float" "Software FPU type.*mask:.*flags:.*" "info float" } elseif [istarget "i\[3456\]86-*-*"] then { gdb_test "info float" "R7:.*Status Word:.*Opcode:.*" "info float" diff --git a/gdb/testsuite/gdb.base/long_long.exp b/gdb/testsuite/gdb.base/long_long.exp index 016b0e6..182f049 100644 --- a/gdb/testsuite/gdb.base/long_long.exp +++ b/gdb/testsuite/gdb.base/long_long.exp @@ -152,23 +152,14 @@ if { $sizeof_double == 8 } { # but a hybrid. They are in little endian format with the two words # swapped in big endian format. - if [ istarget "arm*-*-*" ] then { - -# assume the long long represents a floating point double in ARM format - gdb_test "p/f oct" ".*2.1386676354387559e\\+265.*" - - } elseif [ istarget "xscale*-*-*" ] then { - -# assume the long long represents a floating point double in ARM format - gdb_test "p/f oct" ".*2.1386676354387559e\\+265.*" - - } else { - -# assume the long long represents a floating point double in little -# endian format - gdb_test "p/f oct" ".*-5.9822653797615723e-120.*" - - } + if { [istarget "arm*-*-*"] || [istarget "xscale*-*-*"] } then { + # assume the long long represents a floating point double in ARM format + gdb_test "p/f oct" ".*2.1386676354387559e\\+265.*" + } else { + # assume the long long represents a floating point double in little + # endian format + gdb_test "p/f oct" ".*-5.9822653797615723e-120.*" + } } else { -- cgit v1.1