Subversion Repositories openrisc

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

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

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

/* Basic test for the new VMX intrinsics.  */

#include <altivec.h>

int f(vector int a, int b)

{

  return vec_extract (a, b);

}

short f1(vector short a, int b)

{

  return vec_extract (a, b);

}

vector short f2(vector short a, int b)

{

  return vec_insert (b, a, b);

}

vector float f3(vector float a, int b)

{

  return vec_insert (b, a, b);

}

float g(void);

vector float f4(float b, int t)

{

  return vec_promote (g(), t);

}

vector float f5(float b)

{

  return vec_splats (g());

}