[Bug fortran/71014] associate statement inside omp parallel do appears to disable default private attribute for inner loop indices

[jakub at gcc dot gnu.org]

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

--- Comment #10 from Jakub Jelinek <jakub at gcc dot gnu.org> ---
Author: jakub
Date: Fri Aug 19 15:30:33 2016
New Revision: 239620

URL: https://gcc.gnu.org/viewcvs?rev=239620&root=gcc&view=rev
Log:
        PR fortran/71014
        * resolve.c (gfc_resolve): For ns->construct_entities don't save, clear
        and restore omp state around the resolving.

        * testsuite/libgomp.fortran/pr71014.f90: New test.

Added:
    trunk/libgomp/testsuite/libgomp.fortran/pr71014.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/resolve.c
    trunk/libgomp/ChangeLog