I believe the following program is valid; it is compiled by g95, ifort, NAG
f95, but gfortran rejects it with:

  Error: Expression at (1) must be of INTEGER type

For the for KIND we had a similar problem, see
        PR fortran/31154
        PR fortran/31229
        PR fortran/33334
and     PR 34254

module m
  integer, parameter :: strlen = 5
end module m

character(strlen) function test()
  use m
  test = 'A'
end function test


-- 
           Summary: Fails: character(len=use_associated_const) function
                    foo()
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Keywords: rejects-valid
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: burnus at gcc dot gnu dot org
OtherBugsDependingO 32834
             nThis:


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

Reply via email to