mirror of
https://github.com/llvm/llvm-project.git
synced 2025-04-16 11:36:46 +00:00
10 lines
326 B
Fortran
10 lines
326 B
Fortran
! REQUIRES: openmp_runtime
|
|
! RUN: %not_todo_cmd %flang_fc1 -emit-llvm %openmp_flags -fopenmp-version=52 -o - %s 2>&1 | FileCheck %s
|
|
|
|
! CHECK: not yet implemented: OpenMPInteropConstruct
|
|
program interop_test
|
|
use omp_lib
|
|
integer(omp_interop_kind) :: obj
|
|
!$omp interop init(targetsync,target: obj)
|
|
end program interop_test
|