17 lines
294 B
FortranFixed
17 lines
294 B
FortranFixed
|
! RUN: %flang_fc1 -fopenmp -fopenacc -E %s 2>&1 | FileCheck %s
|
||
|
|
program main
|
||
|
|
! CHECK: k01=1+1
|
||
|
|
k01=1+
|
||
|
|
!$ & 1
|
||
|
|
|
||
|
|
! CHECK: !$omp parallel private(k01)
|
||
|
|
!$omp parallel
|
||
|
|
!$omp+ private(k01)
|
||
|
|
!$omp end parallel
|
||
|
|
|
||
|
|
! CHECK-NOT: comment
|
||
|
|
!$omp parallel
|
||
|
|
!$acc+comment
|
||
|
|
!$omp end parallel
|
||
|
|
end
|