Skip gnat.dg/prot7.adb on hppa.
[official-gcc.git] / libgomp / testsuite / libgomp.c / declare-variant-3.h
blob772fc20a5193335b58973d1b16d8d1edd50c8093
1 #pragma omp declare target
2 int
3 f30 (void)
5 return 30;
8 int
9 f35 (void)
11 return 35;
14 int
15 f53 (void)
17 return 53;
20 int
21 f70 (void)
23 return 70;
26 int
27 f75 (void)
29 return 75;
32 int
33 f80 (void)
35 return 80;
38 #pragma omp declare variant (f30) match (device={isa("sm_30")})
39 #pragma omp declare variant (f35) match (device={isa("sm_35")})
40 #pragma omp declare variant (f53) match (device={isa("sm_53")})
41 #pragma omp declare variant (f70) match (device={isa("sm_70")})
42 #pragma omp declare variant (f75) match (device={isa("sm_75")})
43 #pragma omp declare variant (f80) match (device={isa("sm_80")})
44 int
45 f (void)
47 return 0;
50 #pragma omp end declare target
52 int
53 main (void)
55 int v = 0;
57 #pragma omp target map(from:v)
58 v = f ();
60 if (v == 0)
61 __builtin_abort ();
63 __builtin_printf ("Nvptx accelerator: sm_%d\n", v);
65 return 0;