Projet_SETI_RISC-V/riscv-gnu-toolchain/gcc/libgomp/testsuite/libgomp.c++/loop-6.C
2023-03-06 14:48:14 +01:00

26 lines
303 B
C

// { dg-do run }
extern "C" void abort (void);
volatile int count;
static int test(void)
{
return ++count > 0;
}
int i;
int main()
{
#pragma omp for lastprivate (i)
for (i = 0; i < 10; ++i)
{
if (test())
continue;
abort ();
}
if (i != count)
abort ();
return 0;
}