URL
https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk
Only display areas with differences |
Details |
Blame |
View Log
Rev 38 |
Rev 154 |
// { dg-do run }
|
// { dg-do run }
|
|
|
extern "C" void abort(void);
|
extern "C" void abort(void);
|
#define N 1000
|
#define N 1000
|
|
|
int foo()
|
int foo()
|
{
|
{
|
int i = 0, j;
|
int i = 0, j;
|
|
|
#pragma omp parallel for num_threads(2) shared (i)
|
#pragma omp parallel for num_threads(2) shared (i)
|
for (j = 0; j < N; ++j)
|
for (j = 0; j < N; ++j)
|
{
|
{
|
#pragma omp parallel num_threads(1) shared (i)
|
#pragma omp parallel num_threads(1) shared (i)
|
{
|
{
|
#pragma omp atomic
|
#pragma omp atomic
|
i++;
|
i++;
|
}
|
}
|
}
|
}
|
|
|
return i;
|
return i;
|
}
|
}
|
|
|
int main()
|
int main()
|
{
|
{
|
if (foo() != N)
|
if (foo() != N)
|
abort ();
|
abort ();
|
return 0;
|
return 0;
|
}
|
}
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.