[Bug fortran/77632] [F08] Pointer initialisation does not quite work with arrays

[kargl at gcc dot gnu.org]

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  <kargl@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  <kargl@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.