Libgomp: testsuite/libgomp.c/single-2.c Source File

00001 #include <stdlib.h>
00002 
00003 int
00004 main (void)
00005 {
00006   int i;
00007   i = 4;
00008 #pragma omp single copyprivate (i)
00009   {
00010     i = 6;
00011   }
00012   if (i != 6)
00013     abort ();
00014   return 0;
00015 }