Retro68/gcc/libgomp/testsuite/libgomp.oacc-c-c++-common/kernels-alias-ipa-pta-3.c
2017-04-10 13:32:00 +02:00

27 lines
457 B
C

/* { dg-additional-options "-fipa-pta" } */
#include <stdlib.h>
#define N 2
int
main (void)
{
unsigned int *a = (unsigned int *)malloc (N * sizeof (unsigned int));
unsigned int *b = a;
unsigned int *c = (unsigned int *)malloc (N * sizeof (unsigned int));
#pragma acc kernels pcopyout (a[0:N], b[0:N], c[0:N])
{
a[0] = 0;
b[0] = 1;
c[0] = a[0];
}
if (a[0] != 1 || b[0] != 1 || c[0] != 1)
abort ();
free (a);
free (c);
}