[Bug fortran/59488] [OpenMP] named constant in parallel construct leads to "not specified in enclosing parallel" error.

[jakub at gcc dot gnu.org]

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

--- Comment #5 from Jakub Jelinek <jakub at gcc dot gnu.org> ---
Author: jakub
Date: Fri Oct 10 11:08:37 2014
New Revision: 216067

URL: https://gcc.gnu.org/viewcvs?rev=216067&root=gcc&view=rev
Log:
    PR fortran/59488
    * trans-openmp.c (gfc_omp_predetermined_sharing): Return
    OMP_CLAUSE_DEFAULT_SHARED for parameters or vtables.

    * gfortran.dg/gomp/pr59488-1.f90: New test.
    * gfortran.dg/gomp/pr59488-2.f90: New test.

Added:
    trunk/gcc/testsuite/gfortran.dg/gomp/pr59488-1.f90
    trunk/gcc/testsuite/gfortran.dg/gomp/pr59488-2.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/trans-openmp.c
    trunk/gcc/testsuite/ChangeLog