https://gcc.gnu.org/bugzilla/show_bug.cgi?id=82886
--- Comment #1 from G. Steinmetz <gs...@t-online.de> ---
A possible reduction :
$ cat z1.f90
program p
use, intrinsic :: iso_c_binding, only: c_ptr, c_null_ptr
type t
type(c_ptr) :: my_c_ptr
end type
contains
subroutine sub0() bind(c)
type(t), target :: my_f90_type
my_f90_type%my_c_ptr = c_null_ptr
end subroutine
end
