libgomp/testsuite/libgomp.oacc-c-c++-common/lib-2.c

   1 /* { dg-do run } */
   2
   3 #include <openacc.h>
   4
   5 int
   6 main (int argc, char **argv)
   7 {
   8   acc_device_t devtype = acc_device_host;
   9
  10 #if ACC_DEVICE_TYPE_nvidia
  11   devtype = acc_device_nvidia;
  12
  13   if (acc_get_num_devices (acc_device_nvidia) == 0)
  14     return 0;
  15 #endif
  16
  17   acc_init (devtype);
  18
  19   acc_shutdown (devtype);
  20
  21   acc_shutdown (devtype);
  22
  23   return 0;
  24 }
  25
  26 /* { dg-output "no device initialized" } */
  27 /* { dg-shouldfail "" } */