re PR fortran/88902 (ICE: Segmentation fault (in DFS::DFS_write_tree_body))
authorJakub Jelinek <jakub@gcc.gnu.org>
Sat, 19 Jan 2019 08:43:12 +0000 (09:43 +0100)
committerJakub Jelinek <jakub@gcc.gnu.org>
Sat, 19 Jan 2019 08:43:12 +0000 (09:43 +0100)
commit152f258f9a05d338a7e71c469e4e10fa02e038dd
tree1a6927f8afaa108a82f54596a1ae8d15e2ed572c
parent1f7c5604c8be5d0f3025ec1abcdfb11230d7f4cd
re PR fortran/88902 (ICE: Segmentation fault (in DFS::DFS_write_tree_body))

PR fortran/88902
* trans-decl.c (gfc_get_symbol_decl): Don't add length to function
or parent function if it has been added there already.

* gfortran.dg/pr88902.f90: New test.

From-SVN: r268091
gcc/fortran/ChangeLog
gcc/fortran/trans-decl.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/pr88902.f90 [new file with mode: 0644]