mirror of
https://github.com/OpenMP/Examples.git
synced 2025-04-10 08:22:11 +01:00
22 lines
362 B
C
22 lines
362 B
C
/*
|
|
* @@name: nesting_restrict.5
|
|
* @@type: C
|
|
* @@operation: compile
|
|
* @@expect: ct-error
|
|
* @@version: pre_omp_3.0
|
|
*/
|
|
void work(int i, int j) {}
|
|
void wrong5(int n)
|
|
{
|
|
#pragma omp parallel
|
|
{
|
|
#pragma omp critical
|
|
{
|
|
work(n, 0);
|
|
/* incorrect nesting of barrier region in a critical region */
|
|
#pragma omp barrier
|
|
work(n, 1);
|
|
}
|
|
}
|
|
}
|