[patch, fortran] Fix part of PR 67679, spurious undefined warning

[Thomas Koenig]

Hello world,

the attached patch fixes a 7/8/9 regression where a spurious warning
about compiler-generated variables, with allocation on stat.

The rest of the PR (ALLOCATE in an IF statememnt, later use
of the array) is a dup of PR 66459, which has now been reclassified
as a middle-end bug.

If I get this part committed, I intend to resolve 67679 as a duplicate
of 66459.

Regression-tested. OK for trunk?

Regards

	Thomas

2019-02-03  Thomas Koenig  <tkoenig@gcc.gnu.org>

	PR fortran/67679
	* trans-array.c (gfc_array_allocate):  For setting the bounds on
	the new array, add a condition for a not previously allocated
	variable.

2019-02-03  Thomas Koenig  <tkoenig@gcc.gnu.org>

	PR fortran/67679
	* gfortran.dg/warn_undefined_1.f90: New test.
	* gfortran.dg/coarray_lock_7.f90: Fix patterns in test.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: p3.diff
Type: text/x-patch
Size: 4994 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/gcc-patches/attachments/20190203/a225ca4f/attachment.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: warn_undefined_1.f90
Type: text/x-fortran
Size: 593 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/gcc-patches/attachments/20190203/a225ca4f/attachment-0001.bin>