Sign in
gnu
/
gcc
/
1f16a020acbea0af26209478990b83b1a1ba3a2b
/
.
/
libgomp
/
testsuite
/
libgomp.fortran
/
requires-1-aux.f90
blob: a18caeb4c694545a31783b3707cc4a59e6173719 [
file
] [
log
] [
blame
]
!
{
dg
-
skip
-
if
""
{
*-*-*
}
}
module
m
integer x
end
module
m
subroutine foo
use
m
implicit
none
!
$omp requires unified_address
x
=
1
!
$omp target enter data map
(
always
,
to
:
x
)
end