[RFA/testsuite]: gdb.base/call-rt-st.exp: Fix typo

Corinna Vinschen
2004-09-01T14:06:15Z

Hi,

call-rt-st.exp contains two typos which result in testing against the wrong
datatype. Patch tested on Linux natively and on linux-x-sh-elf BE and LE.

Corinna

* gdb.base/call-rt-st.exp: Fix typos.

Index: gdb.base/call-rt-st.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/call-rt-st.exp,v
retrieving revision 1.15
diff -u -p -r1.15 call-rt-st.exp
--- gdb.base/call-rt-st.exp 6 Jan 2004 19:05:14 -0000 1.15
+++ gdb.base/call-rt-st.exp 1 Sep 2004 14:05:37 -0000
@@ -187,13 +187,13 @@ if {![gdb_skip_float_test "print print_t
".*Contents of two_floats_t:\[ \r\n\]+-2\\.345000\[ \t]+1\\.000000\[ \r\n\]+.\[0-9\]+ = \\{float1 = -2\\.34500003, float2 = 1\\}"
}

-if ![gdb_skip_stdio_test "print print_bit_flags_char(*flags)"] {
- print_struct_call "print_bit_flags_char(*flags)" \
+if ![gdb_skip_stdio_test "print print_bit_flags_char(*cflags)"] {
+ print_struct_call "print_bit_flags_char(*cflags)" \
".*alpha\[ \r\n\]+gamma\[ \r\n\]+epsilon\[ \r\n\]+.\[0-9\]+ = \\{alpha = 1 '\\\\001', beta = 0 '\\\\0', gamma = 1 '\\\\001', delta = 0 '\\\\0', epsilon = 1 '\\\\001', omega = 0 '\\\\0'\\}"
}

-if ![gdb_skip_stdio_test "print print_bit_flags_short(*flags)"] {
- print_struct_call "print_bit_flags_short(*flags)" \
+if ![gdb_skip_stdio_test "print print_bit_flags_short(*sflags)"] {
+ print_struct_call "print_bit_flags_short(*sflags)" \
".*alpha\[ \r\n\]+gamma\[ \r\n\]+epsilon\[ \r\n\]+.\[0-9\]+ = \\{alpha = 1, beta = 0, gamma = 1, delta = 0, epsilon = 1, omega = 0\\}"
}

--
Corinna Vinschen
Cygwin Project Co-Leader
Red Hat, Inc.