[Bug fortran/101871] Array of strings of different length passed as an argument produces invalid result.

[kargl at gcc dot gnu.org via Gcc-bugs]

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

--- Comment #3 from kargl at gcc dot gnu.org ---
(In reply to anlauf from comment #2)
> PR85547 is likely related to this one.

Yes, indeed.  Looks like a duplicate.  I checked
that array.c(gfc_match_array_constructor) does the
right things.  So, someplace in the handling of
gfc_arglist, gfortran is overriding the typespec
set by the array with the typespec of the first
element if that element is an expression.