mirror of
https://github.com/OpenMP/Examples.git
synced 2025-04-07 23:22:11 +01:00
23 lines
374 B
C
23 lines
374 B
C
/*
|
|
* @@name: ordered.2c
|
|
* @@type: C
|
|
* @@compilable: no
|
|
* @@linkable: no
|
|
* @@expect: failure
|
|
*/
|
|
void work(int i) {}
|
|
|
|
void ordered_wrong(int n)
|
|
{
|
|
int i;
|
|
#pragma omp for ordered
|
|
for (i=0; i<n; i++) {
|
|
/* incorrect because an iteration may not execute more than one
|
|
ordered region */
|
|
#pragma omp ordered
|
|
work(i);
|
|
#pragma omp ordered
|
|
work(i+1);
|
|
}
|
|
}
|