19 lines
362 B
C
19 lines
362 B
C
/* { dg-do compile } */
|
|
|
|
int dequeue (float *a);
|
|
void work (int i, float *a);
|
|
void
|
|
a13 (float *x, float *y)
|
|
{
|
|
int ix_next, iy_next;
|
|
#pragma omp parallel shared(x, y) private(ix_next, iy_next)
|
|
{
|
|
#pragma omp critical (xaxis)
|
|
ix_next = dequeue (x);
|
|
work (ix_next, x);
|
|
#pragma omp critical (yaxis)
|
|
iy_next = dequeue (y);
|
|
work (iy_next, y);
|
|
}
|
|
}
|