https://gcc.gnu.org/bugzilla/show_bug.cgi?id=95837
Dominique d'Humieres <dominiq at lps dot ens.fr> changed:
What |Removed |Added
----------------------------------------------------------------------------
Ever confirmed|0 |1
Last reconfirmed| |2020-06-23
Status|UNCONFIRMED |WAITING
--- Comment #1 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
The problem seems more serious.
type t
character(len=:, kind=4), pointer :: str2
end type t
type(t) :: var
character(len=:, kind=4), pointer :: str
print *, kind(str), kind(var%str2)
str(1:1) = 4_"a"
end
result
% ./a.out
4 4
Program received signal SIGSEGV: Segmentation fault - invalid memory reference.
