[Bug fortran/82796] [6/7/8 Regression] Private+equivalence in used module breaks compilation of pure function

[kargl at gcc dot gnu.org]

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

--- Comment #2 from kargl at gcc dot gnu.org ---
Author: kargl
Date: Sat Nov  4 00:34:40 2017
New Revision: 254403

URL: https://gcc.gnu.org/viewcvs?rev=254403&root=gcc&view=rev
Log:
2017-11-01  Steven G. Kargl  <kargl@gcc.gnu.org>

        PR fortran/82796
        * resolve.c (resolve_equivalence): An entity in a common block within
        a module cannot appear in an equivalence statement if the entity is
        with a pure procedure.

2017-11-01  Steven G. Kargl  <kargl@gcc.gnu.org>

        PR fortran/82796
        * gfortran.dg/equiv_pure.f90: New test.

Added:
    trunk/gcc/testsuite/gfortran.dg/equiv_pure.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/resolve.c
    trunk/gcc/testsuite/ChangeLog