[patch, fortran] Fix the rest of PR 71203

[Thomas König]

Hello world,

the attached patch fixes the rest of PR 71203 (i.e. the non-character
parts). I have checked in gdb that the shape set with this patch
does indeed not create a memory leak.

Regression-tested. OK for trunk?

(This makes three patches that are currently awaiting review, the
other two are https://gcc.gnu.org/ml/fortran/2019-03/msg00022.html
and https://gcc.gnu.org/ml/fortran/2019-02/msg00241.html.  I'd
appreciate somebody looking at these, I think I am close to the
limit of concurrent patches in my tree :-)

Regards

	Thomas

2019-03-09  Thomas König  <tkoenig@gcc.gnu.org>

	PR fortran/71203
	* decl.c (add_init_expr_to_sym):  Add shape if init has none.  Add
	assert that it has to be an EXPR_ARRAY in this case.

2019-03-09  Thomas König  <tkoenig@gcc.gnu.org>

	PR fortran/71203
	* gfortran.dg/array_simplify_3.f90: New test case.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: p1.diff
Type: text/x-patch
Size: 701 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/gcc-patches/attachments/20190309/608dcfe3/attachment.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: array_simplify_3.f90
Type: text/x-fortran
Size: 218 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/gcc-patches/attachments/20190309/608dcfe3/attachment-0001.bin>