gcc/testsuite/gcc.dg/gomp/pr35818.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

/* PR middle-end/35818 */
/* { dg-do compile } */
/* { dg-options "-fopenmp" } */

extern int a[];

void
foo (void)
{
#pragma omp parallel
#pragma omp master
  a[3] = 1;
#pragma omp parallel shared(a)
#pragma omp master
  a[3] = 1;
}