view libgomp/testsuite/libgomp.oacc-c++/declare-1.C @ 158:494b0b89df80 default tip

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

/* { dg-do run { target openacc_nvidia_accel_selected } } */

#include <stdlib.h>

template<class T>
T foo()
{
  T a, b;
  #pragma acc declare create (a)

  #pragma acc parallel copyout (b)
  {
    a = 5;
    b = a;
  }

  return b;
}

int
main (void)
{
  int rc;

  rc = foo<int>();

  if (rc != 5)
    abort ();

  return 0;
}