openmp: Fix error message in Fortran front-end

An extra comma in an error message causes failures in the Fortran tests for
declare variant, because the message differs from that expected.

2022-01-31  Kwok Cheung Yeung  <kcy@codesourcery.com>

	gcc/fortran/
	* openmp.c (gfc_match_omp_context_selector_specification): Remove
	extra comma in error message.

diff --git a/gcc/fortran/ChangeLog.omp b/gcc/fortran/ChangeLog.omp
index 81c4d9a129b94261000bb231de8c1ff0fe2d8b05..a78fab44352ee59182ea7c8964aec55938f538f2 100644 (file)
--- a/gcc/fortran/ChangeLog.omp
+++ b/gcc/fortran/ChangeLog.omp
@@ -1,3 +1,8 @@
+2022-01-31  Kwok Cheung Yeung  <kcy@codesourcery.com>
+
+       * openmp.c (gfc_match_omp_context_selector_specification): Remove
+       extra comma in error message.
+
 2022-01-25  Kwok Cheung Yeung  <kcy@codesourcery.com>
 
        * openmp.c (omp_target_device_selectors): New.

diff --git a/gcc/fortran/openmp.c b/gcc/fortran/openmp.c
index e448868d246c73d770f799c470a9677ddf25e967..94930fed059c187e2a727f86368a0f9cd7664bdb 100644 (file)
--- a/gcc/fortran/openmp.c
+++ b/gcc/fortran/openmp.c
@@ -4844,7 +4844,7 @@ gfc_match_omp_context_selector_specification (gfc_omp_set_selector **oss_head,
            gfc_error ("expected 'construct', 'device', 'implementation', "
                       "'target_device' or 'user' at %C");
          else
-           gfc_error ("expected 'construct', 'device', 'implementation', "
+           gfc_error ("expected 'construct', 'device', 'implementation' "
                       "or 'user' at %C");
          return MATCH_ERROR;
        }