b826d551fc
To be consistent with OpenACC and will find the tests in one single directory for OpenMP. Reviewed By: kiranchandramohan Differential Revision: https://reviews.llvm.org/D127529
11 lines
179 B
Fortran
11 lines
179 B
Fortran
! RUN: %flang_fc1 -fopenmp -fsyntax-only %s
|
|
|
|
subroutine s
|
|
integer, pointer :: p
|
|
integer, target :: t
|
|
|
|
!$omp parallel private(p)
|
|
p=>t
|
|
!$omp end parallel
|
|
end subroutine
|