https://gcc.gnu.org/bugzilla/show_bug.cgi?id=119928
Bug ID: 119928
Summary: [15/16 Regression] Bogus "Interface mismatch" in
gfortran.dg/proc_ptr_52.f90 with -Wall
Product: gcc
Version: 16.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: anlauf at gcc dot gnu.org
Target Milestone: ---
Compiling the testcase with -O -Wall I get:
% gfc-16 gcc/testsuite/gfortran.dg/proc_ptr_52.f90 -O -Wall
gcc/testsuite/gfortran.dg/proc_ptr_52.f90:65:11:
65 | y = apply (f, x) ! Fixed by first chunk in patch
| 1
Error: Interface mismatch in dummy procedure 'f' at (1): Type mismatch in
argument '_formal_0' (INTEGER(4)/CLASS(*))
gcc/testsuite/gfortran.dg/proc_ptr_52.f90:69:11:
69 | y = apply (fun, x) ! PR93925; fixed as above
| 1
Error: Interface mismatch in dummy procedure 'f' at (1): Type mismatch in
argument '_formal_0' (INTEGER(4)/CLASS(*))
This does not occur with version 14 or earlier.
