This is the mail archive of the gcc-patches@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Re: [patch, committed, fortran] PR82009 [F08] ICE with block construct


Thanks, Jerry.
On Wed, 4 Jul 2018 at 19:14, Jerry DeLisle <jvdelisle@charter.net> wrote:
>
> 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);



-- 
"If you can't explain it simply, you don't understand it well enough"
- Albert Einstein


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]