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
