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

--- Comment #1 from G. Steinmetz <gs...@t-online.de> ---

Just simplified a bit :

program p
   call s(null())
contains
   subroutine s(x) bind(c)
      character(:), pointer :: x
   end
end

Reply via email to