aboutsummaryrefslogtreecommitdiff
path: root/gdb
diff options
context:
space:
mode:
Diffstat (limited to 'gdb')
-rw-r--r--gdb/testsuite/ChangeLog6
-rw-r--r--gdb/testsuite/gdb.base/call-ar-st.exp8
-rw-r--r--gdb/testsuite/gdb.base/call-rt-st.exp5
3 files changed, 14 insertions, 5 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index ebaaeda..7e0a941 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+2001-07-16 Stephane Carrez <Stephane.Carrez@worldnet.fr>
+
+ * call-ar-st.exp: Use gdb_skip_float_test to avoid executing
+ tests that print a float.
+ * call-rt-st.exp: Likewise.
+
2001-07-12 Mark Kettenis <kettenis@gnu.org>
* gdb.base/so-impl-ld.exp: Remove stray space that prevented
diff --git a/gdb/testsuite/gdb.base/call-ar-st.exp b/gdb/testsuite/gdb.base/call-ar-st.exp
index 61380e9..d7721c8 100644
--- a/gdb/testsuite/gdb.base/call-ar-st.exp
+++ b/gdb/testsuite/gdb.base/call-ar-st.exp
@@ -1,4 +1,4 @@
-# Copyright 1998, 1999, 2000
+# Copyright 1998, 1999, 2000, 2001
# Free Software Foundation, Inc.
# This program is free software; you can redistribute it and/or modify
@@ -193,7 +193,8 @@ gdb_test "tbreak 1220" \
"Breakpoint.* file .*$srcfile, line 1220.*" \
"tbreakpoint line 1220"
-if ![gdb_skip_stdio_test "continuing to breakpoint 1220"] {
+if {![gdb_skip_float_test "continuing to breakpoint 1220"] && \
+ ![gdb_skip_stdio_test "continuing to breakpoint 1220"] } {
send_gdb "continue\n"
gdb_expect_list "continuing to breakpoint 1220" ".*$gdb_prompt $" {
"Continuing\\."
@@ -278,7 +279,8 @@ gdb_test "tbreak 1236" \
"Breakpoint.* file .*$srcfile, line 1236.*" \
"tbreakpoint line 1236"
-if ![gdb_skip_stdio_test "continuing to 1236"] {
+if {![gdb_skip_float_test "continuing to 1236"] && \
+ ![gdb_skip_stdio_test "continuing to 1236"] } {
send_gdb "continue\n"
gdb_expect_list "continuing to 1236" ".*$gdb_prompt $" {
"Continuing\\..*array_c"
diff --git a/gdb/testsuite/gdb.base/call-rt-st.exp b/gdb/testsuite/gdb.base/call-rt-st.exp
index 70af9be..cfd81e1 100644
--- a/gdb/testsuite/gdb.base/call-rt-st.exp
+++ b/gdb/testsuite/gdb.base/call-rt-st.exp
@@ -1,4 +1,4 @@
-# Copyright 1998, 1999, 2000 Free Software Foundation, Inc.
+# Copyright 1998, 1999, 2000, 2001 Free Software Foundation, Inc.
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
@@ -173,7 +173,8 @@ if {![gdb_skip_float_test "print print_one_double(*d1)"] && \
}
}
-if ![gdb_skip_stdio_test "print print_two_floats(*f3)"] {
+if {![gdb_skip_float_test "print print_two_floats(*f3)"] && \
+ ![gdb_skip_stdio_test "print print_two_floats(*f3)"] } {
send_gdb "print print_two_floats(*f3)\n"
gdb_expect {
-re ".*Contents of two_floats_t:\[ \r\n\]+-2\\.345000\[ \t]+1\\.000000\[ \r\n\]+.\[0-9\]+ = \{float1 = -2\\.34500003, float2 = 1\}.*$gdb_prompt $" {