diff options
Diffstat (limited to 'gdb')
-rw-r--r-- | gdb/testsuite/ChangeLog | 6 | ||||
-rw-r--r-- | gdb/testsuite/gdb.base/call-ar-st.exp | 8 | ||||
-rw-r--r-- | gdb/testsuite/gdb.base/call-rt-st.exp | 5 |
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 $" { |