diff options
| author | Michael Snyder <msnyder@vmware.com> | 2002-05-23 15:42:44 +0000 |
|---|---|---|
| committer | Michael Snyder <msnyder@vmware.com> | 2002-05-23 15:42:44 +0000 |
| commit | b61a87338a562c80b0af226b85ade74aa451636b (patch) | |
| tree | 0ddba2cb95edd04b844fdc9877053f3ba847052f | |
| parent | 13ae64f3c752ec57e71471d8820c72823a8d827e (diff) | |
| download | gdb-b61a87338a562c80b0af226b85ade74aa451636b.zip gdb-b61a87338a562c80b0af226b85ade74aa451636b.tar.gz gdb-b61a87338a562c80b0af226b85ade74aa451636b.tar.bz2 | |
2002-05-23 Michael Snyder <msnyder@redhat.com>
* gdb.base/all-bin.exp: Allow for reduced floating point precision.
* gdb.base/call-rt-st.exp: Ditto.
| -rw-r--r-- | gdb/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.base/all-bin.exp | 14 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.base/call-rt-st.exp | 10 |
3 files changed, 24 insertions, 5 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 1b4401b..f4abde4 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2002-05-23 Michael Snyder <msnyder@redhat.com> + + * gdb.base/all-bin.exp: Allow for reduced floating point precision. + * gdb.base/call-rt-st.exp: Ditto. + 2002-05-19 Michael Chastain <mec@shout.net> * gdb.c++/inherit.exp: Accept "VTT for ..." in output strings. diff --git a/gdb/testsuite/gdb.base/all-bin.exp b/gdb/testsuite/gdb.base/all-bin.exp index d809db7..33594fd 100644 --- a/gdb/testsuite/gdb.base/all-bin.exp +++ b/gdb/testsuite/gdb.base/all-bin.exp @@ -189,10 +189,18 @@ send_gdb "print v_int+v_double\n" gdb_expect { -re ".*206.56565.*$gdb_prompt $" { pass "print value of v_int+v_double" - } + } + -re ".*206.565643.*$gdb_prompt $" { + # D10V has 4-byte doubles + if [istarget "d10v*-*"] then { + pass "print value of v_int+v_double (D10V)" + } else { + fail "print value of v_int+v_double (precision)" + } + } -re ".*$gdb_prompt $" { fail "print value of v_int+v_double" } - timeout { fail "(timeout) print value of v_int+" } - } + timeout { fail "(timeout) print value of v_int+v_double" } +} # diff --git a/gdb/testsuite/gdb.base/call-rt-st.exp b/gdb/testsuite/gdb.base/call-rt-st.exp index 033b5ef..0386aa1 100644 --- a/gdb/testsuite/gdb.base/call-rt-st.exp +++ b/gdb/testsuite/gdb.base/call-rt-st.exp @@ -175,8 +175,14 @@ if ![gdb_skip_stdio_test "print print_one_large_struct(...)"] { if {![gdb_skip_float_test "print print_one_double(*d1)"] && \ ![gdb_skip_stdio_test "print print_one_double(*d1)"] } { - print_struct_call "print_one_double(*d1)" \ - ".*Contents of one_double_t:\[ \r\n\]+1\\.111110\[ \r\n\]+.\[0-9\]+ = \\{double1 = 1\\.11111\\}" + if [istarget "d10v*-*"] then { + # D10V has 4-byte doubles + print_struct_call "print_one_double(*d1)" \ + ".*Contents of one_double_t:\[ \r\n\]+1\\.111110\[ \r\n\]+.\[0-9\]+ = \\{double1 = 1\\.11110997\\}" + } else { + print_struct_call "print_one_double(*d1)" \ + ".*Contents of one_double_t:\[ \r\n\]+1\\.111110\[ \r\n\]+.\[0-9\]+ = \\{double1 = 1\\.11111\\}" + } } if {![gdb_skip_float_test "print print_two_floats(*f3)"] && \ |