re PR fortran/30880 (Derived types with default value -- function with ENTRY: rejecte...
authorPaul Thomas <pault@gcc.gnu.org>
Sat, 7 Apr 2007 20:25:43 +0000 (20:25 +0000)
committerPaul Thomas <pault@gcc.gnu.org>
Sat, 7 Apr 2007 20:25:43 +0000 (20:25 +0000)
commit145bdc2cbc1237d3f3ab25f45d18f1fce7ecb2b5
treeaef028cedf643c33e61fa8d4f28a708be3b4ce98
parent4c6b3ec7507e827156a1fdf8b904303b50eedf75
re PR fortran/30880 (Derived types with default value -- function with ENTRY: rejected at compile time)

2007-04-07  Paul Thomas  <pault@gcc.gnu.org>

PR fortran/30880
* resolve.c (resolve_fl_variable): Set flag to 2 for automatic
arrays.  Make condition for automatic array error explicit.
If a dummy, no error on an INTENT(OUT) derived type.

2007-04-07  Paul Thomas  <pault@gcc.gnu.org>

PR fortran/30880
* gfortran.dg/used_dummy_types_8.f90: New test.

From-SVN: r123645
gcc/fortran/ChangeLog
gcc/fortran/resolve.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/used_dummy_types_8.f90 [new file with mode: 0644]