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

--- Comment #3 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
(In reply to Paul Thomas from comment #2)
> This is already fixed on my working branch.
> 
> This used to be the error message:
> 
> Character argument ‘c’ at (1) must be length 1 because procedure ‘bar’ is
> BIND(C)
> 
> Is this required by the standard?

F2003 has

 15.2.1  Interoperability of intrinsic types

[...]

 if the type is character, interoperability also requires that the length type
parameter be omitted or be specified by an initialization
expression whose value is one. 

F2008, 15.3.2 has the same language, as does F2018, 18.3.1.

While no diagnostic is required (not a constraint), it is an error,
and it would be good to flag it as such.

[I'll look up the array part later]

Reply via email to