$ cat a10.f90 integer :: i(2,2) data ((i(k,j), j = 1, k), k = 1, 2) / 3 * 0 / end $ gfortran a10.f90 In file a10.f90:2
data ((i(k,j), j = 1, k), k = 1, 2) / 3 * 0 / 1 Error: Parameter 'k' at (1) has not been declared or is a variable, which does not reduce to a constant expression -- Summary: failure in implied do loop data initialization Product: gcc Version: 4.2.0 Status: UNCONFIRMED Keywords: rejects-valid Severity: normal Priority: P3 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: fxcoudert at gcc dot gnu dot org http://gcc.gnu.org/bugzilla/show_bug.cgi?id=29395