[Bug fortran/96320] New: gfortran 8-10 shape mismatch in assumed-length dummy argument character array

[damian at sourceryinstitute dot org]

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

            Bug ID: 96320
           Summary: gfortran 8-10 shape mismatch in assumed-length dummy
                    argument character array
           Product: gcc
           Version: 10.1.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 code below compiles cleanly with the NAG Fortran compiler. I believe the
error message is incorrect.  Gfotran 8, 9 and 10 give the same message.

± cat shape-mismatch.f90 
module foobar
  type foo
  contains
    procedure, nopass :: bar
  end type
  interface
    module subroutine bar(arg)
      character(len=*) arg(:)
    end subroutine
  end interface
contains
  module procedure bar
  end procedure
end module

± gfortran -c shape-mismatch.f90 
shape-mismatch.f90:12:22:

   12 |   module procedure bar
      |                      1
Error: Shape mismatch in argument 'arg' at (1)

± gfortran --version
GNU Fortran (GCC) 10.1.0