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

--- Comment #2 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
I wonder if the patches in comment 1 or at
https://gcc.gnu.org/ml/fortran/2015-03/msg00143.html are not papering over the
real issue. I have modified the FX' test as

  CHARACTER(*, kind = 4), PARAMETER :: animals(*)  = [ CHARACTER(10) :: ]
  print *, kind(animals), len(animals), size(animals), "'", animals, "'"
  end

With the patch in the fortran mailing list I get

           4           0           0 ''

i.e., the kind is properly recorded, but not the length, while I am expecting
that animals be an array of size zero of character(10) of kind == 4. I had a
look at the standard, but did not find anything relevant for this case.

Reply via email to