[flang-commits] [flang] 0b490f1 - [FLANG][OpenMP][Taskloop] - Add testcase for reduction and in_reduction clause in taskloop construct (#139704)

[via flang-commits]

Author: Kaviya Rajendiran
Date: 2025-05-14T10:26:21+05:30
New Revision: 0b490f11da245ad178bb4389cd8bfd858262aca6

URL: https://github.com/llvm/llvm-project/commit/0b490f11da245ad178bb4389cd8bfd858262aca6
DIFF: https://github.com/llvm/llvm-project/commit/0b490f11da245ad178bb4389cd8bfd858262aca6.diff

LOG: [FLANG][OpenMP][Taskloop] - Add testcase for reduction and in_reduction clause in taskloop construct (#139704)

Added a testcase for reduction and in_reduction clause in taskloop
construct.
Reduction and in_reduction clauses are not supported in taskloop so
below error is issued: "not yet implemented: Unhandled clause
REDUCTION/IN_REDUCTION in TASKLOOP construct"

Added: 
    flang/test/Lower/OpenMP/Todo/taskloop-inreduction.f90
    flang/test/Lower/OpenMP/Todo/taskloop-reduction.f90

Modified: 
    

Removed: 
    


################################################################################
diff  --git a/flang/test/Lower/OpenMP/Todo/taskloop-inreduction.f90 b/flang/test/Lower/OpenMP/Todo/taskloop-inreduction.f90
new file mode 100644
index 0000000000000..8acc399a92abe
--- /dev/null
+++ b/flang/test/Lower/OpenMP/Todo/taskloop-inreduction.f90
@@ -0,0 +1,13 @@
+! RUN: %not_todo_cmd bbc -emit-fir -fopenmp -fopenmp-version=50 -o - %s 2>&1 | FileCheck %s
+! RUN: %not_todo_cmd %flang_fc1 -emit-fir -fopenmp -fopenmp-version=50 -o - %s 2>&1 | FileCheck %s
+
+! CHECK: not yet implemented: Unhandled clause IN_REDUCTION in TASKLOOP construct
+subroutine omp_taskloop_inreduction()
+   integer x
+   x = 0
+   !$omp taskloop in_reduction(+:x)
+   do i = 1, 100
+      x = x + 1
+   end do
+   !$omp end taskloop
+end subroutine omp_taskloop_inreduction

diff  --git a/flang/test/Lower/OpenMP/Todo/taskloop-reduction.f90 b/flang/test/Lower/OpenMP/Todo/taskloop-reduction.f90
new file mode 100644
index 0000000000000..0c16bd227257f
--- /dev/null
+++ b/flang/test/Lower/OpenMP/Todo/taskloop-reduction.f90
@@ -0,0 +1,13 @@
+! RUN: %not_todo_cmd bbc -emit-fir -fopenmp -fopenmp-version=50 -o - %s 2>&1 | FileCheck %s
+! RUN: %not_todo_cmd %flang_fc1 -emit-fir -fopenmp -fopenmp-version=50 -o - %s 2>&1 | FileCheck %s
+
+! CHECK: not yet implemented: Unhandled clause REDUCTION in TASKLOOP construct
+subroutine omp_taskloop_reduction()
+   integer x
+   x = 0
+   !$omp taskloop reduction(+:x)
+   do i = 1, 100
+      x = x + 1
+   end do
+   !$omp end taskloop
+end subroutine omp_taskloop_reduction