Subversion Repositories openrisc

/* { dg-do compile { target powerpc*-*-* } } */

/* { dg-require-effective-target powerpc_altivec_ok } */

/* { dg-options "-maltivec" } */

/* Program to test the vector_size attribute.  This needs to run on a

   target that has vectors, so use AltiVec.  */

#define vector __attribute__((vector_size(16)))

vector int foobar;

/* Only floats and integrals allowed.  We don't care if they map to SIs.  */

struct X { int frances; };

vector struct X hotdog; /* { dg-error "invalid vector type" } */

/* Arrays of vectors.  */

vector char b[10], ouch;

/* Pointers of vectors.  */

vector short *shoe, polish;

int xxx[sizeof(foobar) == 16 ? 69 : -1];

int nc17[sizeof(shoe) == sizeof (char *) ? 69 : -1];

code ()

{

  *shoe = polish;

  b[1] = ouch;

}

vector short

hoop ()

{

  return polish;

}