https://gcc.gnu.org/bugzilla/show_bug.cgi?id=77632
--- Comment #5 from kargl at gcc dot gnu.org --- (In reply to kargl from comment #4) > Author: kargl > Date: Thu Jun 20 22:16:29 2019 > New Revision: 272526 > > URL: https://gcc.gnu.org/viewcvs?rev=272526&root=gcc&view=rev > Log: > 2019-06-20 Steven G. Kargl <ka...@gcc.gnu.org> > > PR fortran/77632 > * /decl.c (variable_decl): Mark a variable that is a target in pointer > initialization when in PROGRAM, MODULE, or SUBMODULE scope with an > implicit save. > > 2019-06-20 Steven G. Kargl <ka...@gcc.gnu.org> > > PR fortran/77632 > * gfortran.dg/pr77632_1.f90: New test. > > Added: > trunk/gcc/testsuite/gfortran.dg/pr77632_1.f90 > Modified: > trunk/gcc/fortran/ChangeLog > trunk/gcc/fortran/decl.c > trunk/gcc/testsuite/ChangeLog This patch fixes the issue with the code in comment #2. It does not fix the problem shown by the original code.