view libgomp/testsuite/libgomp.oacc-c-c++-common/pr83589.c @ 143:76e1cf5455ef

add cbc_gc test
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sun, 23 Dec 2018 19:24:05 +0900
parents 84e7813d76e9
children
line wrap: on
line source

/* { dg-do run } */
/* { dg-set-target-env-var GOMP_NVPTX_JIT "-O0" } */

#define n 32

int
main (void)
{
  int arr_a[n];

#pragma acc parallel copyout(arr_a) num_gangs(1) num_workers(1) vector_length(32)
  {
    #pragma acc loop vector
    for (int m = 0; m < 32; m++)
      ;

    #pragma acc loop vector
    for (int m = 0; m < 32; m++)
      arr_a[m] = 0;
  }
}