2000-04-07 J.T. Conklin <jtc@redback.com>

* gdb.base/funcargs.exp: Relax patterns matching pointers to char.
This commit is contained in:
J.T. Conklin 2000-04-07 22:26:35 +00:00
parent 134e61c4a7
commit 23e37ab112
2 changed files with 6 additions and 2 deletions

View File

@ -1,3 +1,7 @@
2000-04-07 J.T. Conklin <jtc@redback.com>
* gdb.base/funcargs.exp: Relax patterns matching pointers to char.
Thu Mar 30 13:26:19 2000 Philippe De Muyter <phdm@macqel.be>
* gdb.base/call-ar-st.c (init_small_structs, main): Use floating-point

View File

@ -289,7 +289,7 @@ proc pointer_args {} {
setup_xfail "a29k-*-udi"
gdb_run_cmd
gdb_expect {
-re ".* call3a \\(cp=$hex \"a\", sp=$hex, ip=$hex, lp=$hex\\) .*$gdb_prompt $" { pass "run to call3a" }
-re ".* call3a \\(cp=$hex \"a.*\", sp=$hex, ip=$hex, lp=$hex\\) .*$gdb_prompt $" { pass "run to call3a" }
-re "$gdb_prompt $" { fail "run to call3a" ; gdb_suppress_tests; }
timeout { fail "(timeout) run to call3a" ; gdb_suppress_tests; }
}
@ -301,7 +301,7 @@ proc pointer_args {} {
# Continue; should stop at call3b and print actual arguments.
# Try dereferencing the arguments.
if [gdb_test "cont" ".* call3b \\(ucp=$hex \"b\", usp=$hex, uip=$hex, ulp=$hex\\) .*" "continue to call3b"] {
if [gdb_test "cont" ".* call3b \\(ucp=$hex \"b.*\", usp=$hex, uip=$hex, ulp=$hex\\) .*" "continue to call3b"] {
gdb_suppress_tests;
}