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  
       9  void static
      10  avx_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  }