1/* { dg-do run } */
2/* { dg-require-effective-target avx } */
3/* { dg-options "-O2 -mavx" } */
4
5#include "avx-check.h"
6
7#define CONTROL 5
8
9void static
10avx_test (void)
11{
12  union256d u, s1;
13  double e [4];
14
15  s1.x = _mm256_set_pd (2134.3343,1234.635654,453.345635,54646.464356);
16  u.x = _mm256_permute_pd (s1.x, CONTROL);
17
18  e[0] = (CONTROL&0x01) ? s1.a[1] : s1.a[0];
19  e[1] = (CONTROL&0x02) ? s1.a[1] : s1.a[0];
20  e[2] = (CONTROL&0x04) ? s1.a[3] : s1.a[2];
21  e[3] = (CONTROL&0x08) ? s1.a[3] : s1.a[2];
22
23  if (check_union256d (u, e))
24    abort ();
25}
26