[Bug fortran/90048] Fortran OpenACC 'private' clause rejected for predetermined private loop iteration variable

[tschwinge at gcc dot gnu.org]

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

--- Comment #2 from Thomas Schwinge <tschwinge at gcc dot gnu.org> ---
Author: tschwinge
Date: Wed Apr 17 08:34:20 2019
New Revision: 270406

URL: https://gcc.gnu.org/viewcvs?rev=270406&root=gcc&view=rev
Log:
[PR90048] Fortran OpenACC 'private' clause rejected for predetermined private
loop iteration variable

        gcc/fortran/
        PR fortran/90048
        * openmp.c (gfc_resolve_do_iterator): Handle sharing_clauses for
        OpenACC, too.
        (gfc_resolve_oacc_blocks): Populate sharing_clauses with private
        clauses.
        gcc/testsuite/
        PR fortran/90048
        * gfortran.dg/goacc/private-explicit-kernels-1.f95: New file.
        * gfortran.dg/goacc/private-explicit-parallel-1.f95: Likewise.
        * gfortran.dg/goacc/private-explicit-routine-1.f95: Likewise.

Added:
    trunk/gcc/testsuite/gfortran.dg/goacc/private-explicit-kernels-1.f95
    trunk/gcc/testsuite/gfortran.dg/goacc/private-explicit-parallel-1.f95
    trunk/gcc/testsuite/gfortran.dg/goacc/private-explicit-routine-1.f95
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/openmp.c
    trunk/gcc/testsuite/ChangeLog