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

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index a7d2ff8a8a40df84af1176579f9674df1cf1de01..4f3a8e16a0eed123495a3aa6880c897e1302e217 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,8 @@
+2013-12-16  Jakub Jelinek  <jakub@redhat.com>
+
+       PR libgomp/59337
+       * openmp.c (resolve_omp_atomic): Adjust error message.
+
 2013-12-15  Janus Weil  <janus@gcc.gnu.org>
 
        PR fortran/59493

diff --git a/gcc/fortran/openmp.c b/gcc/fortran/openmp.c
index 6c4dccbed10c47a6e4614ec21fbe5fc93b13f892..f4b8d908f9205bf85f536f490f55577bc71411bf 100644 (file)
--- 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;

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index e7c54bc2898fbed7394a0e5c4a4cb986b698c2d9..1e0db5b85391479fdf2d3b352ae1892a378f0416 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2013-12-16  Jakub Jelinek  <jakub@redhat.com>
+
+       PR libgomp/59337
+       * gfortran.dg/gomp/pr59337.f90: New test.
+
 2013-12-16  Jakub Jelinek  <jakub@redhat.com>
 
        PR middle-end/58956