Retro68/gcc/libgomp/testsuite/libgomp.oacc-c-c++-common/crash-1.c
2017-10-07 02:16:47 +02:00

28 lines
325 B
C

/* { dg-do link } */
/* For -O0, ICEd in nvptx backend due to unexpected frame size. */
#pragma acc routine worker
void
worker_matmul (int *c, int i)
{
int j;
#pragma acc loop
for (j = 0; j < 4; j++)
c[j] = j;
}
int
main ()
{
int c[4];
#pragma acc parallel
{
worker_matmul (c, 0);
}
return 0;
}