[Bug fortran/91443] -Wargument-mismatch does not catch mismatch for global procedure

[tkoenig at gcc dot gnu.org]

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

--- Comment #4 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
(In reply to Janne Blomqvist from comment #3)
> I'm seeing a failure in the testcase libgomp.fortran/appendix-a/a.28.5.f90
> which looks like it might(?) be caused by this:
> 
> $ gfortran a.28.5.f90 
> a.28.5.f90:29:20:
> 
>    29 |           CALL SUB1(A)
>       |                    1
> Error: Rank mismatch in argument ‘x’ at (1) (rank-1 and scalar)
> 
> Or is this something else?

Yep, that's PR 91473.

I think I will just commit that one with -std=legacy...