17 lines
356 B
C
17 lines
356 B
C
/* { dg-do "compile" } */
|
|
/* { dg-additional-options "--param ggc-min-expand=0" } */
|
|
/* { dg-additional-options "--param ggc-min-heapsize=0" } */
|
|
/* { dg-additional-options "-g" } */
|
|
|
|
/* Minimized from on target-2.c. */
|
|
|
|
void
|
|
fn3 (int x)
|
|
{
|
|
double b[3 * x];
|
|
int i;
|
|
#pragma omp target
|
|
#pragma omp parallel for
|
|
for (i = 0; i < x; i++)
|
|
b[i] += 1;
|
|
}
|