Skip gnat.dg/prot7.adb on hppa.
[official-gcc.git] / libgomp / testsuite / libgomp.c-c++-common / declare_target-1.c
blobc5670dfb7db73408a39e1fd8b52f9961a7153fb6
1 /* PR c++/99509 */
3 #pragma omp declare target
4 int data[] = {5};
5 #pragma omp end declare target
7 static inline int
8 foo (int idx)
10 return data[idx];
13 int
14 main ()
16 int i = -1;
17 #pragma omp target map(from:i)
18 i = foo(0);
19 if (i != 5)
20 __builtin_abort ();
21 return 0;