xref: /openbsd-src/gnu/gcc/libgomp/testsuite/libgomp.c++/loop-4.C (revision 91f110e064cd7c194e59e019b83bb7496c1c84d4)
1 extern "C" void abort (void);
2 
3 main()
4 {
5   int i, a;
6 
7   a = 30;
8 
9 #pragma omp parallel for firstprivate (a) lastprivate (a) \
10 	num_threads (2) schedule(static)
11   for (i = 0; i < 10; i++)
12     a = a + i;
13 
14   /* The thread that owns the last iteration will have computed
15      30 + 5 + 6 + 7 + 8 + 9 = 65.  */
16   if (a != 65)
17     abort ();
18 
19   return 0;
20 }
21