File tree Expand file tree Collapse file tree 2 files changed +29
-0
lines changed
flang/test/Lower/OpenMP/Todo Expand file tree Collapse file tree 2 files changed +29
-0
lines changed Original file line number Diff line number Diff line change
1
+ ! RUN: %not_todo_cmd %flang_fc1 -emit-fir -fopenmp -fopenmp-version=51 -o - %s 2>&1 | FileCheck %s
2
+
3
+ ! CHECK: not yet implemented: OmpAllocateClause ALIGN modifier
4
+ program p
5
+ integer :: x
6
+ integer :: a
7
+ integer :: i
8
+ ! $omp parallel private(x) allocate(align(4): x)
9
+ do i= 1 ,10
10
+ a = a + i
11
+ end do
12
+ ! $omp end parallel
13
+ end program p
Original file line number Diff line number Diff line change
1
+ ! REQUIRES: openmp_runtime
2
+ ! RUN: %not_todo_cmd %flang_fc1 -emit-llvm -fopenmp -fopenmp-version=51 -o - %s 2>&1 | FileCheck %s
3
+
4
+ ! CHECK: not yet implemented: Unhandled clause allocate in omp.parallel
5
+ ! CHECK: LLVM Translation failed for operation: omp.parallel
6
+ program p
7
+ use omp_lib
8
+ integer :: x
9
+ integer :: a
10
+ integer :: i
11
+ ! $omp parallel private(x) allocate(allocator(omp_default_mem_alloc): x)
12
+ do i= 1 ,10
13
+ a = a + i
14
+ end do
15
+ ! $omp end parallel
16
+ end program p
You can’t perform that action at this time.
0 commit comments