URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Only display areas with differences |
Details |
Blame |
View Log
Rev 149 |
Rev 154 |
/* { dg-do compile } */
|
/* { dg-do compile } */
|
/* { dg-options "-fopenmp -fdump-tree-gimple" } */
|
/* { dg-options "-fopenmp -fdump-tree-gimple" } */
|
|
|
void f1(void)
|
void f1(void)
|
{
|
{
|
#pragma omp flush
|
#pragma omp flush
|
}
|
}
|
|
|
int x;
|
int x;
|
|
|
void f2(bool p)
|
void f2(bool p)
|
{
|
{
|
int z;
|
int z;
|
if (p)
|
if (p)
|
{
|
{
|
#pragma omp flush (x)
|
#pragma omp flush (x)
|
}
|
}
|
else
|
else
|
{
|
{
|
#pragma omp flush (x, z, p)
|
#pragma omp flush (x, z, p)
|
}
|
}
|
}
|
}
|
|
|
/* { dg-final { scan-tree-dump-times "__sync_synchronize" 3 "gimple" } } */
|
/* { dg-final { scan-tree-dump-times "__sync_synchronize" 3 "gimple" } } */
|
/* { dg-final { cleanup-tree-dump "gimple" } } */
|
/* { dg-final { cleanup-tree-dump "gimple" } } */
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.