Mercurial > hg > CbC > CbC_gcc
view libgomp/testsuite/libgomp.oacc-c-c++-common/acc_on_device-1.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 | 04ced10e8804 |
children |
line wrap: on
line source
/* Disable the acc_on_device builtin; we want to test the libgomp library function. */ /* { dg-additional-options "-fno-builtin-acc_on_device" } */ #include <stdlib.h> #include <openacc.h> int main (int argc, char *argv[]) { /* Host. */ { if (!acc_on_device (acc_device_none)) abort (); if (!acc_on_device (acc_device_host)) abort (); if (acc_on_device (acc_device_not_host)) abort (); if (acc_on_device (acc_device_nvidia)) abort (); } /* Host via offloading fallback mode. */ #pragma acc parallel if(0) { if (!acc_on_device (acc_device_none)) abort (); if (!acc_on_device (acc_device_host)) abort (); if (acc_on_device (acc_device_not_host)) abort (); if (acc_on_device (acc_device_nvidia)) abort (); } #if !ACC_DEVICE_TYPE_host /* Offloaded. */ #pragma acc parallel { if (acc_on_device (acc_device_none)) abort (); if (acc_on_device (acc_device_host)) abort (); if (!acc_on_device (acc_device_not_host)) abort (); #if ACC_DEVICE_TYPE_nvidia if (!acc_on_device (acc_device_nvidia)) abort (); #else if (acc_on_device (acc_device_nvidia)) abort (); #endif } #endif return 0; }