1 /* Not all implement this checking.
2 { dg-skip-if "" { openacc_radeon_accel_selected || openacc_host_selected } } */
10 main (int argc
, char **argv
)
17 h
= (unsigned char *) malloc (N
);
19 for (i
= 0; i
< N
; i
++)
26 fprintf (stderr
, "CheCKpOInT\n");
27 acc_memcpy_to_device (d
, 0, N
);
31 acc_memcpy_from_device (h
, d
, N
);
33 for (i
= 0; i
< N
; i
++)
46 /* { dg-output "CheCKpOInT(\n|\r\n|\r).*" } */
47 /* { dg-output "invalid host address" } */
48 /* { dg-shouldfail "" } */