1  /* { dg-do run } */
       2  /* { dg-require-effective-target avx } */
       3  /* { dg-options "-O2 -mavx" } */
       4  
       5  #include "avx-check.h"
       6  
       7  #ifndef OFFSET
       8  #define OFFSET 1
       9  #endif
      10  
      11  #if OFFSET < 0 || OFFSET > 1
      12  #error OFFSET must be within [0..1]
      13  #endif
      14  
      15  void static
      16  avx_test (void)
      17  {
      18    int i;
      19    union256d u, u2, u3, s1;
      20    union128d s2, s3;
      21    double e [4];
      22  
      23    s1.x = _mm256_set_pd (2134.3343,1234.635654,453.345635,54646.464356);
      24    s2.x = _mm_set_pd (68543.731254, 3452.578238);
      25    u.x = _mm256_insertf128_pd (s1.x, s2.x, OFFSET);
      26  
      27    for (i = 0; i < 4; i++)
      28      e[i] = s1.a[i];
      29  
      30    for (i=0; i < 2; i++)
      31      e[i + (OFFSET * 2)] = s2.a[i];
      32   
      33    if (check_union256d (u, e))
      34      abort ();
      35  
      36    s3.x = _mm_set_pd (435345.43535, 23235.316545);
      37    u2.x = _mm256_set_m128d(s3.x, s2.x);
      38    u3.x = _mm256_setr_m128d(s2.x, s3.x);
      39  
      40    for (i = 0; i < 2; i++)
      41      e[i] = s2.a[i];
      42  
      43    for (i = 0; i < 2; i++)
      44      e[i + 2] = s3.a[i];
      45  
      46    if (check_union256d (u2, e))
      47      abort ();
      48  
      49    if (check_union256d (u3, e))
      50      abort ();
      51  }