[gcc/devel/omp/gcc-12] openmp: Fix loop transformation tests

[gcc/devel/omp/gcc-12] openmp: Fix loop transformation tests

[Frederik Harwath]

https://gcc.gnu.org/g:fe884508f6b92ae84ba888b1fc431327ed0b2388

commit fe884508f6b92ae84ba888b1fc431327ed0b2388
Author: Frederik Harwath <frederik@codesourcery.com>
Date:   Tue Apr 25 15:32:56 2023 +0200

    openmp: Fix loop transformation tests
    
    libgomp/ChangeLog:
    
            * testsuite/libgomp.fortran/loop-transforms/tile-2.f90: Add reduction clause.
            * testsuite/libgomp.fortran/loop-transforms/unroll-1.f90: Initialize var.
            * testsuite/libgomp.fortran/loop-transforms/unroll-simd-1.f90: Add reduction
            and initialization.

Diff:
---
 libgomp/ChangeLog.omp                                              | 7 +++++++
 libgomp/testsuite/libgomp.fortran/loop-transforms/tile-2.f90       | 2 +-
 libgomp/testsuite/libgomp.fortran/loop-transforms/unroll-1.f90     | 2 ++
 .../testsuite/libgomp.fortran/loop-transforms/unroll-simd-1.f90    | 3 ++-
 4 files changed, 12 insertions(+), 2 deletions(-)

diff --git a/libgomp/ChangeLog.omp b/libgomp/ChangeLog.omp
index 32bc3b0c82c..9cca6a97666 100644
--- a/libgomp/ChangeLog.omp
+++ b/libgomp/ChangeLog.omp
@@ -1,3 +1,10 @@
+2023-04-25  Frederik Harwath  <frederik@codesourcery.com>
+
+	* testsuite/libgomp.fortran/loop-transforms/tile-2.f90: Add reduction clause.
+	* testsuite/libgomp.fortran/loop-transforms/unroll-1.f90: Initialize var.
+	* testsuite/libgomp.fortran/loop-transforms/unroll-simd-1.f90: Add reduction
+	and initialization.
+
 2023-04-20  Andrew Stubbs  <ams@codesourcery.com>
 
 	* basic-allocator.c (basic_alloc_free): Use BASIC_ALLOC_YIELD.
diff --git a/libgomp/testsuite/libgomp.fortran/loop-transforms/tile-2.f90 b/libgomp/testsuite/libgomp.fortran/loop-transforms/tile-2.f90
index 6aedbf4724f..a7cb5e7635d 100644
--- a/libgomp/testsuite/libgomp.fortran/loop-transforms/tile-2.f90
+++ b/libgomp/testsuite/libgomp.fortran/loop-transforms/tile-2.f90
@@ -69,7 +69,7 @@ module test_functions
     integer :: i,j
 
     sum = 0
-    !$omp parallel do collapse(2)
+    !$omp parallel do collapse(2) reduction(+:sum)
     !$omp tile sizes(6,10)
     do i = 1,10,3
        do j = 1,10,3
diff --git a/libgomp/testsuite/libgomp.fortran/loop-transforms/unroll-1.f90 b/libgomp/testsuite/libgomp.fortran/loop-transforms/unroll-1.f90
index f07aab898fa..b91ea275577 100644
--- a/libgomp/testsuite/libgomp.fortran/loop-transforms/unroll-1.f90
+++ b/libgomp/testsuite/libgomp.fortran/loop-transforms/unroll-1.f90
@@ -8,6 +8,7 @@ module test_functions
 
     integer :: i,j
 
+    sum = 0
     !$omp do
     do i = 1,10,3
        !$omp unroll full
@@ -22,6 +23,7 @@ module test_functions
 
     integer :: i,j
 
+    sum = 0
     !$omp parallel do reduction(+:sum)
     !$omp unroll partial(2)
     do i = 1,10,3
diff --git a/libgomp/testsuite/libgomp.fortran/loop-transforms/unroll-simd-1.f90 b/libgomp/testsuite/libgomp.fortran/loop-transforms/unroll-simd-1.f90
index 5fb64ddd6fd..7a43458f0dd 100644
--- a/libgomp/testsuite/libgomp.fortran/loop-transforms/unroll-simd-1.f90
+++ b/libgomp/testsuite/libgomp.fortran/loop-transforms/unroll-simd-1.f90
@@ -9,7 +9,8 @@ module test_functions
 
     integer :: i,j
 
-    !$omp simd
+    sum = 0
+    !$omp simd reduction(+:sum)
     do i = 1,10,3
        !$omp unroll full
        do j = 1,10,3