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>
|
2002-05-06 Michael Snyder <msnyder@redhat.com>
|
||||||
|
|
||||||
* lib/gdb.exp (gdb_test): Add case to allow for status wrapper.
|
* 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
|
#test info files
|
||||||
gdb_test "info files" "" "info files"
|
gdb_test "info files" "" "info files"
|
||||||
#test info float
|
#test info float
|
||||||
if [istarget "arm*-*-*"] then {
|
if { [istarget "arm*-*-*"] || \
|
||||||
gdb_test "info float" "Software FPU type.*mask:.*flags:.*" "info float"
|
[istarget "xscale*-*-*"] || \
|
||||||
} elseif [istarget "xscale*-*-*"] then {
|
[istarget "strongarm*-*-*"] } 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 {
|
|
||||||
gdb_test "info float" "Software FPU type.*mask:.*flags:.*" "info float"
|
gdb_test "info float" "Software FPU type.*mask:.*flags:.*" "info float"
|
||||||
} elseif [istarget "i\[3456\]86-*-*"] then {
|
} elseif [istarget "i\[3456\]86-*-*"] then {
|
||||||
gdb_test "info float" "R7:.*Status Word:.*Opcode:.*" "info float"
|
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
|
# but a hybrid. They are in little endian format with the two words
|
||||||
# swapped in big endian format.
|
# swapped in big endian format.
|
||||||
|
|
||||||
if [ istarget "arm*-*-*" ] then {
|
if { [istarget "arm*-*-*"] || [istarget "xscale*-*-*"] } then {
|
||||||
|
# assume the long long represents a floating point double in ARM format
|
||||||
# assume the long long represents a floating point double in ARM format
|
gdb_test "p/f oct" ".*2.1386676354387559e\\+265.*"
|
||||||
gdb_test "p/f oct" ".*2.1386676354387559e\\+265.*"
|
} else {
|
||||||
|
# assume the long long represents a floating point double in little
|
||||||
} elseif [ istarget "xscale*-*-*" ] then {
|
# endian format
|
||||||
|
gdb_test "p/f oct" ".*-5.9822653797615723e-120.*"
|
||||||
# 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 {
|
} else {
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue