1 extern void abort (void); 2 int a; 3 4 void 5 foo () 6 { 7 int i; 8 a = 30; 9 #pragma omp barrier 10 #pragma omp for lastprivate (a) 11 for (i = 0; i < 1024; i++) 12 { 13 a = i; 14 } 15 if (a != 1023) 16 abort (); 17 } 18 19 int 20 main (void) 21 { 22 #pragma omp parallel num_threads (64) 23 foo (); 24 25 return 0; 26 } 27