[binutils-gdb] Skip floating point tests in return-nodebug.exp if gdb_skip_float_test is true
Yao Qi
qiyao@sourceware.org
Fri Sep 2 14:27:00 GMT 2016
https://sourceware.org/git/gitweb.cgi?p=binutils-gdb.git;h=ae9cf263fdd47c30b997fcf4627609df77ca64c1
commit ae9cf263fdd47c30b997fcf4627609df77ca64c1
Author: Yao Qi <yao.qi@linaro.org>
Date: Fri Sep 2 15:26:54 2016 +0100
Skip floating point tests in return-nodebug.exp if gdb_skip_float_test is true
return-nodebug.exp does the test for various types, but we shouldn't
test with floating point type if gdb_skip_float_test returns true.
gdb/testsuite:
2016-09-02 Yao Qi <yao.qi@linaro.org>
* gdb.base/return-nodebug.exp: Skip the test if skip_float_test
is true and $type is "float" or "double".
Diff:
---
gdb/testsuite/ChangeLog | 5 +++++
gdb/testsuite/gdb.base/return-nodebug.exp | 5 +++++
2 files changed, 10 insertions(+)
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 76b5e9c..ffb993c 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,5 +1,10 @@
2016-09-02 Yao Qi <yao.qi@linaro.org>
+ * gdb.base/return-nodebug.exp: Skip the test if skip_float_test
+ is true and $type is "float" or "double".
+
+2016-09-02 Yao Qi <yao.qi@linaro.org>
+
* gdb.arch/arm-neon.exp: Skip it if gdb_skip_float_test returns
true.
* gdb.base/call-ar-st.exp: Invoke gdb_skip_float_test.
diff --git a/gdb/testsuite/gdb.base/return-nodebug.exp b/gdb/testsuite/gdb.base/return-nodebug.exp
index e44494f..0d58ba5 100644
--- a/gdb/testsuite/gdb.base/return-nodebug.exp
+++ b/gdb/testsuite/gdb.base/return-nodebug.exp
@@ -13,6 +13,8 @@
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
+set skip_float_test [gdb_skip_float_test]
+
proc do_test {type} {
set typenospace [string map {{ } -} $type]
@@ -42,6 +44,9 @@ proc do_test {type} {
}
foreach type {{signed char} {short} {int} {long} {long long} {float} {double}} {
+ if { $skip_float_test && ($type == "float" || $type == "double") } {
+ continue
+ }
set typeesc [string map {{ } {\ }} $type]
set typenospace [string map {{ } -} $type]
More information about the Gdb-cvs
mailing list