Sign in
gnu
/
gcc
/
refs/heads/devel/c++-name-lookup
/
.
/
libgomp
/
testsuite
/
libgomp.oacc-fortran
/
data-already-5.f
blob: f361d8c177231188043563c912f212dbb602463c [
file
] [
log
] [
blame
]
!
{
dg
-
skip
-
if
""
{
*-*-*
}
{
"*"
}
{
"-DACC_MEM_SHARED=0"
}
}
IMPLICIT NONE
INCLUDE
"openacc_lib.h"
INTEGER I
!
$ACC ENTER DATA CREATE
(
I
)
WRITE
(
0
,
*)
"CheCKpOInT"
CALL ACC_COPYIN
(
I
)
END
!
{
dg
-
output
"CheCKpOInT(\n|\r\n|\r).*"
}