This is a point fix for the crash in #116426. Leaving the bug open to further explore declare target issues for interfaces.
12 lines
273 B
Fortran
12 lines
273 B
Fortran
!RUN: %flang_fc1 -emit-hlfir -fopenmp %s -o - | FileCheck %s
|
|
!RUN: %flang_fc1 -emit-hlfir -fopenmp -fopenmp-is-device %s -o - | FileCheck %s
|
|
|
|
!CHECK: module attributes
|
|
module iface
|
|
interface
|
|
subroutine a()
|
|
!$omp declare target
|
|
end subroutine
|
|
end interface
|
|
end module
|