1/* { dg-do run } */ 2/* { dg-require-effective-target avx } */ 3/* { dg-options "-O2 -mavx" } */ 4 5#include "avx-check.h" 6 7#ifndef IMM8 8# define IMM8 99 9#endif 10 11 12void static 13avx_test () 14{ 15 union256d source1, source2, u; 16 double s1[4]={1, 2, 3, 4}; 17 double s2[4]={5, 6, 7, 8}; 18 double e[4]; 19 20 source1.x = _mm256_loadu_pd(s1); 21 source2.x = _mm256_loadu_pd(s2); 22 u.x = _mm256_permute2f128_pd(source1.x, source2.x, IMM8); 23 24 if(IMM8 & 8) e[0] = e[1] = 0; 25 else{ 26 e[0] = (IMM8 & 2 ? s2 : s1)[(IMM8 & 1) * 2]; 27 e[1] = (IMM8 & 2 ? s2 : s1)[(IMM8 & 1) * 2 + 1]; 28 } 29 if(IMM8 & 128) e[3] = e[3] = 0; 30 else{ 31 unsigned m = (IMM8 >> 4) & 3; 32 e[2] = (m & 2 ? s2 : s1)[(m & 1) * 2]; 33 e[3] = (m & 2 ? s2 : s1)[(m & 1) * 2 + 1]; 34 } 35 36 if (check_union256d (u, e)) 37 abort (); 38} 39 40