aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMichael Snyder <msnyder@vmware.com>2001-05-24 18:30:10 +0000
committerMichael Snyder <msnyder@vmware.com>2001-05-24 18:30:10 +0000
commit2caa35cb88a53794723bf0d6126ff6dae112753f (patch)
tree7fe4055939a61b887e8757d89b8fe80672d980f7
parente027f3e8a4613fdc2a7db63dab2b723528445865 (diff)
downloadgdb-2caa35cb88a53794723bf0d6126ff6dae112753f.zip
gdb-2caa35cb88a53794723bf0d6126ff6dae112753f.tar.gz
gdb-2caa35cb88a53794723bf0d6126ff6dae112753f.tar.bz2
2001-05-21 Michael Snyder <msnyder@redhat.com>
* gdb.base/long_long.exp: Allow for targets with 4-byte short.
-rw-r--r--gdb/testsuite/ChangeLog4
-rw-r--r--gdb/testsuite/gdb.base/long_long.exp34
2 files changed, 31 insertions, 7 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 9e634bd..12214b0 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -22,6 +22,10 @@
stop on the call statement as well as the statement after the
call.
+2001-05-21 Michael Snyder <msnyder@redhat.com>
+
+ * gdb.base/long_long.exp: Allow for targets with 4-byte short.
+
2001-05-10 Elena Zannoni <ezannoni@redhat.com>
* gdb.base/completion.exp: Revamp test. Make it execute on all
diff --git a/gdb/testsuite/gdb.base/long_long.exp b/gdb/testsuite/gdb.base/long_long.exp
index 87accdd..69a456b 100644
--- a/gdb/testsuite/gdb.base/long_long.exp
+++ b/gdb/testsuite/gdb.base/long_long.exp
@@ -85,6 +85,16 @@ gdb_expect {
default { }
}
+# Detect targets with 4-byte shorts. Assume all others use 2-bytes.
+
+set sizeof_short 2
+send_gdb "print sizeof(short)\n"
+gdb_expect {
+ -re ".* = 4.*$gdb_prompt $" { set sizeof_short 4 }
+ -re ".*$gdb_prompt $" { }
+ default { }
+}
+
# Detect targets with 4-byte doubles.
set sizeof_double 8
@@ -172,13 +182,23 @@ if { $target_bigendian_p } {
}
- gdb_test "p/d *(short *)&oct" ".*-22738.*"
- gdb_test "p/u *(short *)&oct" ".*42798.*"
- gdb_test "p/o *(short *)&oct" ".*0123456.*"
- gdb_test "p/t *(short *)&oct" ".*1010011100101110.*"
- gdb_test "p/a *(short *)&oct" ".*0xf*ffffa72e.*"
- gdb_test "p/c *(short *)&oct" ".* 46 '.'.*"
- gdb_test "p/f *(short *)&oct" ".*-22738.*"
+ if { $sizeof_short == 2 } {
+ gdb_test "p/d *(short *)&oct" ".*-22738.*"
+ gdb_test "p/u *(short *)&oct" ".*42798.*"
+ gdb_test "p/o *(short *)&oct" ".*0123456.*"
+ gdb_test "p/t *(short *)&oct" ".*1010011100101110.*"
+ gdb_test "p/a *(short *)&oct" ".*0xf*ffffa72e.*"
+ gdb_test "p/c *(short *)&oct" ".* 46 '.'.*"
+ gdb_test "p/f *(short *)&oct" ".*-22738.*"
+ } else {
+ gdb_test "p/d *(short *)&oct" ".*-1490098887.*"
+ gdb_test "p/u *(short *)&oct" ".*2804868409.*"
+ gdb_test "p/o *(short *)&oct" ".*024713562471.*"
+ gdb_test "p/t *(short *)&oct" ".*10100111001011101110010100111001.*"
+ gdb_test "p/a *(short *)&oct" ".*0xf*a72ee539.*"
+ gdb_test "p/c *(short *)&oct" ".* 57 '9'.*"
+ gdb_test "p/f *(short *)&oct" ".*-2.42716126e-15.*"
+ }
gdb_test "x/x &oct" ".*0xa72ee539.*"
gdb_test "x/d &oct" ".*.-1490098887*"