view libgomp/testsuite/libgomp.c-c++-common/unmap-infinity-2.c @ 158:494b0b89df80 default tip

...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 25 May 2020 18:13:55 +0900
parents 1830386684a0
children
line wrap: on
line source

int foo[16];
#pragma omp declare target (foo)

__attribute__((used)) void bar (void)
{
  #pragma omp target parallel for
  for (int i = 0; i < 16; i++)
    foo[i] = i;
}

int
main (int argc, char *argv[])
{
  int *foo_copy = foo;
  /* Try to trigger the unmapping of a REFCOUNT_INFINITY target block.  This
     does nothing at the time of writing.  */
  #pragma omp target exit data map(delete: foo_copy[0:16])
  return 0;
}