re PR fortran/90937 (ICE: in gfc_get_symbol_decl, at fortran/trans-decl.c:1538)
authorThomas Koenig <tkoenig@gcc.gnu.org>
Thu, 20 Jun 2019 11:56:50 +0000 (11:56 +0000)
committerThomas Koenig <tkoenig@gcc.gnu.org>
Thu, 20 Jun 2019 11:56:50 +0000 (11:56 +0000)
commit877ef6287904af71c811883a7a6e985ca10281ec
treed4708a67002a1d913d41760bb9133963403c464d
parent1194e1971ac9ab84b633ee14c5a77f0e475990ab
re PR fortran/90937 (ICE: in gfc_get_symbol_decl, at fortran/trans-decl.c:1538)

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.

From-SVN: r272506
gcc/fortran/ChangeLog
gcc/fortran/trans-types.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/external_procedure_4.f90 [new file with mode: 0644]