From 1e13a5c75fb694d94c057fe267a3b62dd8545d3e Mon Sep 17 00:00:00 2001
From: Krzysztof Parzyszek <Krzysztof.Parzyszek@amd.com>
Date: Mon, 17 Nov 2025 09:36:28 -0600
Subject: [PATCH] [flang][OpenMP] Fix some typo-like things in test case

---
 .../loop-transformation-construct01.f90       | 24 +++++++++----------
 1 file changed, 12 insertions(+), 12 deletions(-)

diff --git a/flang/test/Semantics/OpenMP/loop-transformation-construct01.f90 b/flang/test/Semantics/OpenMP/loop-transformation-construct01.f90
index f718efc32aabf..f4628c9533db8 100644
--- a/flang/test/Semantics/OpenMP/loop-transformation-construct01.f90
+++ b/flang/test/Semantics/OpenMP/loop-transformation-construct01.f90
@@ -13,13 +13,13 @@ subroutine loop_transformation_construct1
 subroutine loop_transformation_construct2
   implicit none
   integer :: i = 5
-  integer :: y
+  integer :: x
   integer :: v(i)
 
   !$omp do
   !$omp tile
   do x = 1, i
-    v(x) = x(x) * 2
+    v(x) = v(x) * 2
   end do
   !$omp end tile
   !$omp end do
@@ -30,26 +30,26 @@ subroutine loop_transformation_construct2
 subroutine loop_transformation_construct2
   implicit none
   integer :: i = 5
-  integer :: y
+  integer :: x
   integer :: v(i)
 
   !$omp do
   !ERROR: Only Loop Transformation Constructs or Loop Nests can be nested within Loop Constructs
   !$omp parallel do
   do x = 1, i
-    v(x) = x(x) * 2
+    v(x) = v(x) * 2
   end do
 end subroutine
 
 subroutine loop_transformation_construct3
   implicit none
   integer :: i = 5
-  integer :: y
+  integer :: x
   integer :: v(i)
 
   !$omp do
   do x = 1, i
-    v(x) = x(x) * 2
+    v(x) = v(x) * 2
   end do
   !ERROR: A DO loop must follow the TILE directive
   !$omp tile
@@ -58,7 +58,7 @@ subroutine loop_transformation_construct3
 subroutine loop_transformation_construct4
   implicit none
   integer :: i = 5
-  integer :: y
+  integer :: x
   integer :: v(i)
 
   !$omp do
@@ -66,14 +66,14 @@ subroutine loop_transformation_construct4
   !$omp tile
   !$omp unroll full
   do x = 1, i
-    v(x) = x(x) * 2
+    v(x) = v(x) * 2
   end do
 end subroutine
 
 subroutine loop_transformation_construct5
   implicit none
   integer :: i = 5
-  integer :: y
+  integer :: x
   integer :: v(i)
 
   !$omp do
@@ -81,20 +81,20 @@ subroutine loop_transformation_construct5
   !$omp tile
   !$omp unroll
   do x = 1, i
-    v(x) = x(x) * 2
+    v(x) = v(x) * 2
   end do
 end subroutine
 
 subroutine loop_transformation_construct6
   implicit none
   integer :: i = 5
-  integer :: y
+  integer :: x
   integer :: v(i)
 
   !$omp do
   !$omp tile
   !$omp unroll partial(2)
   do x = 1, i
-    v(x) = x(x) * 2
+    v(x) = v(x) * 2
   end do
 end subroutine