trans-expr.c (gfc_conv_function_call): Return int instead of void.
authorJakub Jelinek <jakub@redhat.com>
Mon, 13 Jun 2005 15:24:54 +0000 (17:24 +0200)
committerJakub Jelinek <jakub@gcc.gnu.org>
Mon, 13 Jun 2005 15:24:54 +0000 (17:24 +0200)
commitdda895f9c6216d207d277770e221939f3a42e8ff
tree0035578b9cc54831eeec842b51ebb7c3f6932292
parentadacecf105b889e4d7f9b48dea7895724f850d66
trans-expr.c (gfc_conv_function_call): Return int instead of void.

* trans-expr.c (gfc_conv_function_call): Return int instead of
void.  Use a local variable for has_alternate_specifier and
return it.  Avoid modification of function type's return value
in place, since it may be shared.
* trans.h (has_alternate_specifier): Remove.
(gfc_conv_function_call): Change return type.
* trans-stmt.c (has_alternate_specifier): Remove.
(gfc_trans_call): Add a local has_alternate_specifier variable,
set it from gfc_conv_function_call return value.

* gfortran.dg/altreturn_1.f90: New test.

From-SVN: r100878
gcc/ChangeLog
gcc/fortran/trans-expr.c
gcc/fortran/trans-stmt.c
gcc/fortran/trans.h
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/altreturn_1.f90 [new file with mode: 0644]