15 lines
906 B
Fortran
15 lines
906 B
Fortran
|
!RUN: %flang_fc1 -emit-hlfir -fopenmp -fopenmp-is-target-device %s -o - | FileCheck %s --check-prefix=DEVICE
|
||
|
|
!RUN: %flang_fc1 -emit-hlfir -fopenmp %s -o - | FileCheck %s --check-prefix=HOST
|
||
|
|
!RUN: %flang_fc1 -emit-hlfir -fopenmp-is-target-device %s -o - | FileCheck %s --check-prefix=DEVICE-FLAG-ONLY
|
||
|
|
!RUN: bbc -fopenmp -fopenmp-is-target-device -emit-hlfir -o - %s | FileCheck %s --check-prefix=DEVICE
|
||
|
|
!RUN: bbc -fopenmp -emit-hlfir -o - %s | FileCheck %s --check-prefix=HOST
|
||
|
|
!RUN: bbc -fopenmp-is-target-device -emit-hlfir -o - %s | FileCheck %s --check-prefix=DEVICE-FLAG-ONLY
|
||
|
|
|
||
|
|
!DEVICE: module attributes {{{.*}}, omp.is_target_device = true{{.*}}}
|
||
|
|
!HOST: module attributes {{{.*}}, omp.is_target_device = false{{.*}}}
|
||
|
|
!DEVICE-FLAG-ONLY: module attributes {{{.*}}"
|
||
|
|
!DEVICE-FLAG-ONLY-NOT: , omp.is_target_device = {{.*}}
|
||
|
|
!DEVICE-FLAG-ONLY-SAME: }
|
||
|
|
subroutine omp_subroutine()
|
||
|
|
end subroutine omp_subroutine
|