db397e2e5a
gcc/ * varpool.c (varpool_node::get_create): Don't set 'offloadable' flag for the external decls. libgomp/ * testsuite/libgomp.fortran/declare-target-1.f90: New test. * testsuite/libgomp.fortran/declare-target-2.f90: New file. From-SVN: r221421
16 lines
268 B
Fortran
16 lines
268 B
Fortran
! { dg-do run }
|
|
! { dg-additional-sources declare-target-2.f90 }
|
|
|
|
module declare_target_1_mod
|
|
integer :: var_x
|
|
!$omp declare target(var_x)
|
|
end module declare_target_1_mod
|
|
|
|
interface
|
|
subroutine foo ()
|
|
end subroutine foo
|
|
end interface
|
|
|
|
call foo ()
|
|
end
|