3d1b5e710e
... to document the status quo. libgomp/ PR libgomp/92854 * testsuite/libgomp.oacc-c-c++-common/acc_map_data-device_already-1.c: New file. * testsuite/libgomp.oacc-c-c++-common/acc_map_data-device_already-2.c: Likewise. * testsuite/libgomp.oacc-c-c++-common/acc_map_data-device_already-3.c: Likewise. * testsuite/libgomp.oacc-c-c++-common/acc_map_data-host_already-1.c: Likewise. * testsuite/libgomp.oacc-c-c++-common/acc_map_data-host_already-2.c: Likewise. * testsuite/libgomp.oacc-c-c++-common/acc_map_data-host_already-3.c: Likewise. From-SVN: r279231
28 lines
621 B
C
28 lines
621 B
C
/* Verify that we refuse 'acc_map_data' when the "host address [...] is already
|
|
mapped". */
|
|
|
|
/* { dg-skip-if "" { *-*-* } { "*" } { "-DACC_MEM_SHARED=0" } } */
|
|
|
|
#include <assert.h>
|
|
#include <stdio.h>
|
|
#include <openacc.h>
|
|
|
|
float global_var;
|
|
#pragma acc declare create (global_var)
|
|
|
|
int
|
|
main ()
|
|
{
|
|
void *d = acc_malloc (sizeof global_var);
|
|
assert (d);
|
|
fprintf (stderr, "CheCKpOInT\n");
|
|
acc_map_data (&global_var, d, sizeof global_var);
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
/* { dg-output "CheCKpOInT(\n|\r\n|\r).*" } */
|
|
/* { dg-output "host address \\\[\[0-9a-fA-FxX\]+, \\\+4\\\] is already mapped" } */
|
|
/* { dg-shouldfail "" } */
|