Retro68/gcc/libgomp/testsuite/libgomp.oacc-c-c++-common/acc_on_device-1.c
2017-04-10 13:32:00 +02:00

65 lines
1.2 KiB
C

/* 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;
}