diff options
| author | Tobias Burnus <tobias@codesourcery.com> | 2022-09-06 10:02:13 +0200 |
|---|---|---|
| committer | Tobias Burnus <tobias@codesourcery.com> | 2022-09-06 10:02:13 +0200 |
| commit | d6582c662ca0da05c74fa3183e1bc2cadcb21424 (patch) | |
| tree | e4c30c5d55c0478007633119469f4e24eaa67f75 /gcc/fortran/openmp.cc | |
| parent | 0bd514107de7b0f643aa72554b3bdb5aeb5aa0f5 (diff) | |
| download | gcc-d6582c662ca0da05c74fa3183e1bc2cadcb21424.zip gcc-d6582c662ca0da05c74fa3183e1bc2cadcb21424.tar.gz gcc-d6582c662ca0da05c74fa3183e1bc2cadcb21424.tar.bz2 | |
Fix Fortran/openmp: Partial OpenMP 5.2 doacross
This removed a checking snippet which accidentally was left in in commit
r13-2446-g938cda536019cd6a1bc0dd2346381185b420bbf8 ; this caused
fails in gfortran.dg/gomp/doacross-5.f90 (added in that very commit).
Note that a similar but refined check is now done in the middle end.
(The ME version additionally checks whether doacross is present.)
gcc/fortran/
* openmp.cc (resolve_omp_clauses): Remove ordered/linear
check as it is handled now in the middle end.
Diffstat (limited to 'gcc/fortran/openmp.cc')
| -rw-r--r-- | gcc/fortran/openmp.cc | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/gcc/fortran/openmp.cc b/gcc/fortran/openmp.cc index 5142fd7..457e983 100644 --- a/gcc/fortran/openmp.cc +++ b/gcc/fortran/openmp.cc @@ -7625,10 +7625,6 @@ resolve_omp_clauses (gfc_code *code, gfc_omp_clauses *omp_clauses, linear_op = n->u.linear.op; } } - else if (omp_clauses->orderedc) - gfc_error ("LINEAR clause specified together with " - "ORDERED clause with argument at %L", - &n->where); else if (n->u.linear.op != OMP_LINEAR_REF && n->sym->ts.type != BT_INTEGER) gfc_error ("LINEAR variable %qs must be INTEGER " |