[Bug fortran/69455] [7/8/9/10 Regression] [F08] Assembler error(s) when using intrinsic modules in two BLOCK

[kargl at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=69455

--- Comment #16 from kargl at gcc dot gnu.org ---
Author: kargl
Date: Fri Oct 18 17:27:06 2019
New Revision: 277158

URL: https://gcc.gnu.org/viewcvs?rev=277158&root=gcc&view=rev
Log:
2019-10-18  Steven G. Kargl  <ka...@gcc.gnu.org>

        PR fortran/69455
        * trans-decl.c (generate_local_decl): Avoid misconstructed
        intrinsic modules in a BLOCK construct.

2019-10-18  Steven G. Kargl  <ka...@gcc.gnu.org>

        PR fortran/69455
        * gfortran.dg/pr69455_1.f90: New test.
        * gfortran.dg/pr69455_2.f90: Ditto.

Added:
    trunk/gcc/testsuite/gfortran.dg/pr69455_1.f90
    trunk/gcc/testsuite/gfortran.dg/pr69455_2.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/trans-decl.c
    trunk/gcc/testsuite/ChangeLog