https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85954
--- Comment #1 from G. Steinmetz <gs...@t-online.de> ---
Assigned directly :
$ cat z2.f90
program p
character(:), allocatable :: z(:)
call s(z)
contains
subroutine s(x)
character(:), allocatable :: x(:)
x = ['abc']
print *, allocated(x), size(x), len(x), x
end
end
$ gfortran-9-20180527 z2.f90 -static-libgfortran
$ a.out
T 1 3 abc
