Subversion Repositories openrisc

/* { dg-do run } */
/* { dg-options "-mavx2 -O2" } */
/* { dg-require-effective-target avx2 } */
 
#include "avx2-check.h"
#include <string.h>
 
#define MASK 0x1a
 
#define NUM 10
 
static void
init_permpd (double *src1, int seed)
{
  int i, sign = 1;
 
  for (i = 0; i < 4; i++)
    {
      src1[i] = (i + seed) * (i + seed) * sign;
      sign = -sign;
    }
}
 
static void
calc_permpd (double *src1, int mask, double *dst)
{
  int i;
  unsigned temp;
 
  memcpy (dst, src1, 32);
  for (i = 0; i < 4; i++)
    {
      temp = mask >> (i * 2);
      dst[i] = src1[temp & 3];
    }
}
 
static void
avx2_test (void)
{
  union256d src1, dst;
  double dst_ref[4];
  int i;
 
  for (i = 0; i < NUM; i++)
    {
      init_permpd (src1.a, i);
 
      dst.x = _mm256_permute4x64_pd (src1.x, MASK);
      calc_permpd (src1.a, MASK, dst_ref);
 
      if (check_union256d (dst, dst_ref))
	abort ();
    }
}