[flang-commits] [flang] [flang][OpenMP] Fix typos in diagnostic messages, NFC (PR #154953)

[Krzysztof Parzyszek via flang-commits]

https://github.com/kparzysz created https://github.com/llvm/llvm-project/pull/154953

None

>From 9eb56b3022aaa0b37312bf1f3f68d98e21472a5e Mon Sep 17 00:00:00 2001
From: Krzysztof Parzyszek <Krzysztof.Parzyszek at amd.com>
Date: Fri, 22 Aug 2025 08:56:42 -0500
Subject: [PATCH] [flang][OpenMP] Fix typos in diagnostic messages, NFC

---
 flang/lib/Semantics/check-omp-structure.cpp  | 6 +++---
 flang/test/Semantics/OpenMP/groupprivate.f90 | 6 +++---
 2 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/flang/lib/Semantics/check-omp-structure.cpp b/flang/lib/Semantics/check-omp-structure.cpp
index 142423b16334f..5967a18460002 100644
--- a/flang/lib/Semantics/check-omp-structure.cpp
+++ b/flang/lib/Semantics/check-omp-structure.cpp
@@ -1198,13 +1198,13 @@ void OmpStructureChecker::Enter(const parser::OpenMPGroupprivate &x) {
 
     if (sym->has<AssocEntityDetails>()) {
       context_.SayWithDecl(*sym, arg.source,
-          "GROUPPRIVATE argument cannot be an an ASSOCIATE name"_err_en_US);
+          "GROUPPRIVATE argument cannot be an ASSOCIATE name"_err_en_US);
       continue;
     }
     if (auto *obj{sym->detailsIf<ObjectEntityDetails>()}) {
       if (obj->IsCoarray()) {
         context_.Say(arg.source,
-            "GROUPPRIVATE argument cannot be an a coarray"_err_en_US);
+            "GROUPPRIVATE argument cannot be a coarray"_err_en_US);
         continue;
       }
       if (obj->init()) {
@@ -1215,7 +1215,7 @@ void OmpStructureChecker::Enter(const parser::OpenMPGroupprivate &x) {
     }
     if (sym->test(Symbol::Flag::InCommonBlock)) {
       context_.Say(arg.source,
-          "GROUPPRIVATE argument cannot be an a member of a common block"_err_en_US);
+          "GROUPPRIVATE argument cannot be a member of a common block"_err_en_US);
       continue;
     }
     if (!IsCommonBlock(*sym)) {
diff --git a/flang/test/Semantics/OpenMP/groupprivate.f90 b/flang/test/Semantics/OpenMP/groupprivate.f90
index 89afffd9dff65..a875c466111a3 100644
--- a/flang/test/Semantics/OpenMP/groupprivate.f90
+++ b/flang/test/Semantics/OpenMP/groupprivate.f90
@@ -14,7 +14,7 @@ subroutine f00
   integer, save :: y
   associate (z => y)
   block
-    !ERROR: GROUPPRIVATE argument cannot be an an ASSOCIATE name
+    !ERROR: GROUPPRIVATE argument cannot be an ASSOCIATE name
     !$omp groupprivate(z)
   end block
   end associate
@@ -25,7 +25,7 @@ module m01
 implicit none
 integer :: x, y
 common /some_block/ x
-!ERROR: GROUPPRIVATE argument cannot be an a member of a common block
+!ERROR: GROUPPRIVATE argument cannot be a member of a common block
 !$omp groupprivate(x)
 
 contains
@@ -42,6 +42,6 @@ subroutine f01
 module m02
 implicit none
 integer :: x(10)[*]
-!ERROR: GROUPPRIVATE argument cannot be an a coarray
+!ERROR: GROUPPRIVATE argument cannot be a coarray
 !$omp groupprivate(x)
 end module