[Bug fortran/86694] New: gfortran rejects character parameter binding label

[damian at sourceryinstitute dot org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=86694

            Bug ID: 86694
           Summary: gfortran rejects character parameter binding label
           Product: gcc
           Version: 8.2.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: damian at sourceryinstitute dot org
  Target Milestone: ---

The consensus opinion on the J3 mailing list is that the code below is
standard-conforming. The Intel compiler accepts the code. gfortran 5.5, 6.4,
7.3, and 8.2 generate the error message below.

Damian

$ cat c-name.f90 
character(len=5), parameter :: c_name="c_foo"
interface
  subroutine foo() bind(C,name=c_name)
    import c_name
  end subroutine
end interface
end 
$ gfortran -c c-name.f90 
c-name.f90:3:31:

   subroutine foo() bind(C,name=c_name)
                               1
Error: Parameter ‘c_name’ at (1) has not been declared or is a variable, which
does not reduce to a constant expression
c-name.f90:4:10:

     import c_name
          1
Error: IMPORT statement at (1) only permitted in an INTERFACE body
c-name.f90:5:5:

   end subroutine
     1
Error: Expecting END INTERFACE statement at (1)
$ gfortran --version
GNU Fortran (GCC) 8.2.0