Projet_SETI_RISC-V/riscv-gnu-toolchain/gcc/libgomp/testsuite/libgomp.c/pr104783.c

19 lines
239 B
C
Raw Normal View History

2023-03-06 14:48:14 +01:00
int
main (void)
{
unsigned val = 0;
#pragma omp target map(tofrom: val)
#pragma omp simd
for (int i = 0 ; i < 1 ; i++)
{
#pragma omp atomic update
val = val + 1;
}
if (val != 1)
__builtin_abort ();
return 0;
}