This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
[patch, committed, fortran] PR82009 [F08] ICE with block construct
- From: Jerry DeLisle <jvdelisle at charter dot net>
- To: "fortran at gcc dot gnu dot org" <fortran at gcc dot gnu dot org>, GCC Patches <gcc-patches at gcc dot gnu dot org>
- Date: Wed, 4 Jul 2018 11:13:59 -0700
- Subject: [patch, committed, fortran] PR82009 [F08] ICE with block construct
This patch committed as obvious after regression testing and auditing
the code. New test case added.
Author: jvdelisle
Date: Wed Jul 4 18:08:16 2018
New Revision: 262416
URL: https://gcc.gnu.org/viewcvs?rev=262416&root=gcc&view=rev
Log:
2018-07-04 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR fortran/82009
* trans-decl.c (gfc_process_block_locals): Delete assert and set
saved_local_decls = NULL_TREE.
* gfortran.dg/block_16.f08. New test.
Added:
trunk/gcc/testsuite/gfortran.dg/block_16.f08
Modified:
trunk/gcc/fortran/ChangeLog
trunk/gcc/fortran/trans-decl.c
trunk/gcc/testsuite/ChangeLog
diff --git a/gcc/fortran/trans-decl.c b/gcc/fortran/trans-decl.c
index 254768c5828..08c1ebd2d4b 100644
--- a/gcc/fortran/trans-decl.c
+++ b/gcc/fortran/trans-decl.c
@@ -6751,7 +6751,7 @@ gfc_process_block_locals (gfc_namespace* ns)
{
tree decl;
- gcc_assert (saved_local_decls == NULL_TREE);
+ saved_local_decls = NULL_TREE;
has_coarray_vars = false;
generate_local_vars (ns);