subroutine test(n)
    character(len=20), dimension(n) :: string
    data ( string(i) ,i=1,n ) / &
        'A', 'B', 'C', 'D', 'E' /
end subroutine

gives currently:
    data ( string(i) ,i=1,n ) / &
                         1
Error: iterator end at (1) does not simplify

which is unclear, how about something like:

ifort: Error: x.f90, line 3: This symbol must be a defined parameter or an
argument of an inquiry function that evaluates to a compile-time constant.  
[N]
or
NAG f95: Error: Static array STRING cannot have variable bounds


-- 
           Summary: Better error message for variable bond of DATA implied
                    do
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Keywords: diagnostic
          Severity: enhancement
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: burnus at gcc dot gnu dot org


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=32331

Reply via email to