------- Comment #1 from jakub at gcc dot gnu dot org 2008-06-24 10:01 -------
A testcase can be e.g.
int
foo (int *a, int *b, int *c, int *d)
{
return *a + *b + *c + *d;
}
int
main (void)
{
int vara = 1, varb = 0, varc, vard = 4;
#pragma omp parallel shared (vara, varb) private (varc) firstprivate (vard)
{
int vari, varj;
#pragma omp master
vara++;
varc = 3;
vard++;
varj = 6;
foo (&vara, &varb, &varc, &vard);
#pragma omp for reduction (+:varb)
for (vari = 0; vari < 10; vari++)
varb += 2;
}
return 0;
}
at -g -O0 -fopenmp.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36617
