https://gcc.gnu.org/bugzilla/show_bug.cgi?id=104572
anlauf at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
Target Milestone|--- |13.0
Resolution|--- |FIXED
Status|NEW |RESOLVED
--- Comment #5 from anlauf at gcc dot gnu.org ---
(In reply to Steve Kargl from comment #3)
> I'm fine with gfortran emitting either error message.
> As we've both put eyes on the bug, go ahead and use
> your error message and commit.
When using -std=f2018, the new testcase emits:
gcc/testsuite/gfortran.dg/pr104572.f90:12:17:
12 | subroutine s(*) ! { dg-error "Argument of FINAL procedure" }
| 1
Warning: Obsolescent feature: Alternate-return argument at (1)
gcc/testsuite/gfortran.dg/pr104572.f90:12:14:
12 | subroutine s(*) ! { dg-error "Argument of FINAL procedure" }
| 1
Error: Argument of FINAL procedure at (1) must be of type 't'
The error message is also close to that emitted by other brands.
***
Closing.
