[patch, committed] Fix for PR 90937

[Thomas Koenig]

Hello world,

I have committed the attached patch to trunk as obvious to fix another
of the regressions stemming from the "make up formal from actual
arglist" patch, as obvious and simple.

I will backport this patch to the other affected branches, probably
over the weekend.

Regards

	Thomas

2019-06-20  Thomas Koenig  <tkoenig@gcc.gnu.org>

	PR fortran/90937
	* trans-types.c (get_formal_from_actual_arglist): Get symbol from
	current namespace so it will be freed later.  If symbol is of type
	character, get an empty character length.

2019-06-20  Thomas Koenig  <tkoenig@gcc.gnu.org>

	PR fortran/90937
	* gfortran.dg/external_procedure_4.f90: New test.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: p1.diff
Type: text/x-patch
Size: 785 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20190620/3bcfd457/attachment.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: external_procedure_4.f90
Type: text/x-fortran
Size: 346 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20190620/3bcfd457/attachment-0001.bin>