libgomp/testsuite/libgomp.oacc-c/lib-4.c

   1 /* { dg-do run } */
   2
   3 #include <openacc.h>
   4
   5 int
   6 main (int argc, char **argv)
   7 {
   8   acc_init ((acc_device_t) 99);
   9
  10   return 0;
  11 }
  12
  13 /* { dg-shouldfail "libgomp: device 99 is out of range" } */