Skip to content

Commit 9da7c3b

Browse files
[Flang][OpenMP][NFC] Add tests for align and allocator in allocate clauses (#121356)
No functional change. (Also, tried to filter out all ALLOCATOR modifiers, but that makes some other tests fail).
1 parent 416f1c4 commit 9da7c3b

File tree

2 files changed

+29
-0
lines changed

2 files changed

+29
-0
lines changed
Lines changed: 13 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,13 @@
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
Lines changed: 16 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,16 @@
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

0 commit comments

Comments
 (0)