Fix typo's

Author: Thirumalai-Shaktivel

flang/lib/Semantics/check-omp-structure.cpp

@@ -226,7 +226,7 @@ class OmpDesignatorChecker {
     if (name.symbol->test(Symbol::Flag::OmpThreadprivate)) {
       // OpenMP 5.2: 5.2 threadprivate directive restriction
       context_.Say(name.source,
-          "A THREADPRIVATE variable `%s` cannot appear in a UNTIED TASK region"_err_en_US,
+          "A THREADPRIVATE variable `%s` cannot appear in an UNTIED TASK region"_err_en_US,
           name.source);
     }
     return true;

flang/test/Semantics/OpenMP/task-united01.f90 renamed to flang/test/Semantics/OpenMP/task-untied01.f90

@@ -3,7 +3,7 @@
 !
 ! OpenMP 5.2: 5.2 threadprivate directive restriction
 
-subroutine task_united01()
+subroutine task_untied01()
     integer, save :: var_01, var_02(2)
     real          :: var_03
     common /c/ var_03
@@ -12,18 +12,18 @@ subroutine task_united01()
     !$omp threadprivate(/c/)
 
     !$omp task untied
-        !ERROR: A THREADPRIVATE variable `var_01` cannot appear in a UNTIED TASK region
+        !ERROR: A THREADPRIVATE variable `var_01` cannot appear in an UNTIED TASK region
         var_01    = 10
-        !ERROR: A THREADPRIVATE variable `var_02` cannot appear in a UNTIED TASK region
-        !ERROR: A THREADPRIVATE variable `var_01` cannot appear in a UNTIED TASK region
+        !ERROR: A THREADPRIVATE variable `var_02` cannot appear in an UNTIED TASK region
+        !ERROR: A THREADPRIVATE variable `var_01` cannot appear in an UNTIED TASK region
         var_02(1) = sum([var_01, 20])
     !$omp end task
 
     !$omp task untied
-        !ERROR: A THREADPRIVATE variable `var_02` cannot appear in a UNTIED TASK region
-        !ERROR: A THREADPRIVATE variable `var_02` cannot appear in a UNTIED TASK region
+        !ERROR: A THREADPRIVATE variable `var_02` cannot appear in an UNTIED TASK region
+        !ERROR: A THREADPRIVATE variable `var_02` cannot appear in an UNTIED TASK region
         var_02(2) = product(var_02)
-        !ERROR: A THREADPRIVATE variable `var_03` cannot appear in a UNTIED TASK region
+        !ERROR: A THREADPRIVATE variable `var_03` cannot appear in an UNTIED TASK region
         var_03    = 3.14
     !$omp end task
-end subroutine task_united01
+end subroutine task_untied01

mlir/test/Target/LLVMIR/openmp-llvm.mlir

@@ -3021,7 +3021,7 @@ module attributes {omp.is_target_device = true} {
 // -----
 
 llvm.func @omp_task_untied() {
-  // The third argument is 0: which signifies the united task
+  // The third argument is 0: which signifies the untied task
   // CHECK: {{.*}} = call ptr @__kmpc_omp_task_alloc(ptr @1, i32 %{{.*}}, i32 0,
   // CHECK-SAME:     i64 40, i64 0, ptr @{{.*}})
   omp.task untied {