From: Fred Fish Date: Sat, 2 Sep 1995 07:25:13 +0000 (+0000) Subject: * gdb.base/callfuncs.exp (do_function_calls): Remove X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=218f9f03b889ab048141eac1ef6125adef22afc8;p=binutils-gdb.git * gdb.base/callfuncs.exp (do_function_calls): Remove mips-sgi-irix* xfail for "call inferior func with struct - returns char *" and fix test so that an optional (unsigned char *) cast is accepted in the result. --- diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 33991af2ccb..dab977fcd9b 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,11 @@ +Sat Sep 2 00:17:31 1995 Fred Fish + + * gdb.base/callfuncs.exp (do_function_calls): Remove + mips-sgi-irix* xfail for + "call inferior func with struct - returns char *" + and fix test so that an optional (unsigned char *) cast is + accepted in the result. + Fri Sep 1 13:42:01 1995 Fred Fish * gdb.base/funcargs.exp (float_and_integral_args): Remove diff --git a/gdb/testsuite/gdb.base/callfuncs.exp b/gdb/testsuite/gdb.base/callfuncs.exp index 7dca116799e..d16fb0db41e 100644 --- a/gdb/testsuite/gdb.base/callfuncs.exp +++ b/gdb/testsuite/gdb.base/callfuncs.exp @@ -115,7 +115,7 @@ proc do_function_calls {} { gdb_test "p t_float_values2(0.0,0.0)" " = 0" # Although PR 5318 mentions SunOS specifically, this seems - # to be a generic problem on all platforms except r6000. + # to be a generic problem on quite a few platforms. if $prototypes then { setup_xfail "*-*-*" 5318 clear_xfail "rs6000-*-*" @@ -196,8 +196,7 @@ proc do_function_calls {} { setup_xfail "i*86-*-*" gdb_test "p t_structs_d(struct_val1)" "= 9.87.*" \ "call inferior func with struct - returns double" - if {!$gcc_compiled} then { setup_xfail "mips-sgi-irix*" } - gdb_test "p t_structs_a(struct_val1)" "= \"foo\"" \ + gdb_test "p t_structs_a(struct_val1)" "= (.unsigned char .. )?\"foo\"" \ "call inferior func with struct - returns char *" }