diff options
| author | Jakub Jelinek <jakub@redhat.com> | 2013-12-16 16:33:42 +0100 |
|---|---|---|
| committer | Jakub Jelinek <jakub@gcc.gnu.org> | 2013-12-16 16:33:42 +0100 |
| commit | 97a778bdcd1982b33fb73054e565b411893d171a (patch) | |
| tree | 0e9df71ca786e936bfff5917c0b74e17d5369cbd /gcc/fortran/openmp.c | |
| parent | 292e6398d01d8c238b90163caae08c00e4d06ca5 (diff) | |
| download | gcc-97a778bdcd1982b33fb73054e565b411893d171a.zip gcc-97a778bdcd1982b33fb73054e565b411893d171a.tar.gz gcc-97a778bdcd1982b33fb73054e565b411893d171a.tar.bz2 | |
re PR libgomp/59337 (surprising OMP error message)
PR libgomp/59337
* openmp.c (resolve_omp_atomic): Adjust error message.
* gfortran.dg/gomp/pr59337.f90: New test.
From-SVN: r206017
Diffstat (limited to 'gcc/fortran/openmp.c')
| -rw-r--r-- | gcc/fortran/openmp.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/openmp.c b/gcc/fortran/openmp.c index 6c4dccb..f4b8d90 100644 --- a/gcc/fortran/openmp.c +++ b/gcc/fortran/openmp.c @@ -1279,7 +1279,7 @@ resolve_omp_atomic (gfc_code *code) alt_op = INTRINSIC_EQV; break; default: - gfc_error ("!$OMP ATOMIC assignment operator must be " + gfc_error ("!$OMP ATOMIC assignment operator must be binary " "+, *, -, /, .AND., .OR., .EQV. or .NEQV. at %L", &expr2->where); return; |