2002-05-08 Michael Snyder <msnyder@redhat.com>
* gdb.base/long_long.exp: Merge clauses for arm and xscale. * gdb.base/default.exp: Merge clauses for arm, strongarm, xscale.
This commit is contained in:
parent
748f46d42a
commit
fedfc8e665
@ -1,3 +1,8 @@
|
||||
2002-05-08 Michael Snyder <msnyder@redhat.com>
|
||||
|
||||
* 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 <msnyder@redhat.com>
|
||||
|
||||
* lib/gdb.exp (gdb_test): Add case to allow for status wrapper.
|
||||
|
@ -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"
|
||||
|
@ -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 {
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user