]> git.ipfire.org Git - thirdparty/gcc.git/commit
re PR fortran/30876 (Array valued recursive function rejected)
authorPaul Thomas <pault@gcc.gnu.org>
Fri, 11 May 2007 11:46:47 +0000 (11:46 +0000)
committerPaul Thomas <pault@gcc.gnu.org>
Fri, 11 May 2007 11:46:47 +0000 (11:46 +0000)
commitfc2d8680dde7cdf9a19f0007a3a2ae49c7e0aa36
tree954562f2de3bc196c47fcd9c848c6f563adc96a0
parent847b053dd214c6e26a2025bf29422457cb50143d
re PR fortran/30876 (Array valued recursive function rejected)

2007-05-11 Paul Thomas <pault@gcc.gnu.org>

PR fortran/30876
* trans-expr.c (gfc_conv_function_call): Reduce indirection for
direct assignments of recursive array valued functions.
* primary.c (gfc_match_rvalue): Correct error for recursive
function calls such that directly recursive calls of scalar
function without an explicit result are disallowed.

2007-05-11 Paul Thomas <pault@gcc.gnu.org>

PR fortran/30876
* gfortran.dg/recursive_reference_1.f90: Put error at correct
line.
* gfortran.dg/recursive_reference_2.f90: New test.

From-SVN: r124616
gcc/fortran/ChangeLog
gcc/fortran/primary.c
gcc/fortran/trans-expr.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/recursive_reference_1.f90
gcc/testsuite/gfortran.dg/recursive_reference_2.f90 [new file with mode: 0644]