diff options
author | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-02-26 19:36:41 +0000 |
---|---|---|
committer | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-02-26 19:36:41 +0000 |
commit | 827a1ea76773e8c21df0ba9dd48cf54638d9dc26 (patch) | |
tree | 1550250c5c18ab79e95d3fa018aba9b48caf6e1d /gcc/fortran/openmp.c | |
parent | 0be8ff0ac31c862ca6aad821a3eccf559c9e89f2 (diff) | |
download | gcc-827a1ea76773e8c21df0ba9dd48cf54638d9dc26.tar.gz |
2011-02-26 Tobias Burnus <burnus@net-b.de>
PR fortran/47886
* openmp.c (gfc_resolve_omp_directive): Resolve if()
condition of OpenMP's task.
2011-02-26 Tobias Burnus <burnus@net-b.de>
PR fortran/47886
* gfortran.dg/gomp/task-1.f90: New.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@170521 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/openmp.c')
-rw-r--r-- | gcc/fortran/openmp.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/fortran/openmp.c b/gcc/fortran/openmp.c index 24e32eb5d04..2b70c69a984 100644 --- a/gcc/fortran/openmp.c +++ b/gcc/fortran/openmp.c @@ -1573,6 +1573,7 @@ gfc_resolve_omp_directive (gfc_code *code, gfc_namespace *ns ATTRIBUTE_UNUSED) case EXEC_OMP_PARALLEL_SECTIONS: case EXEC_OMP_SECTIONS: case EXEC_OMP_SINGLE: + case EXEC_OMP_TASK: if (code->ext.omp_clauses) resolve_omp_clauses (code); break; |