[Bug fortran/34432] New: integer(kind=init_expression) function is rejected

["burnus at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

I believe the following code is valid and it is accepted by NAG f95, ifort and
g95. Gfortran rejects it with

   Error: Invalid character in name at (1)


module m
  integer, parameter :: int_t = kind(4)
end module m

integer(kind=(int_t)) function test4()
  use m
  test4 = 1
end function test4


For the following -- extra ")" -- I got a not so helpful error message:

integer(kind=int_t)) function test4()
  use m
  test4 = 1
end function test4


-- 
           Summary: integer(kind=init_expression) function  is rejected
           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


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