1/* { dg-do run } */ 2/* { dg-require-effective-target xop } */ 3/* { dg-options "-O2 -mxop" } */ 4 5#include "xop-check.h" 6 7#include <x86intrin.h> 8 9#ifndef ZERO_MATCH 10#define ZERO_MATCH 2 11#endif 12 13static double 14select2dp(double *src1, double *src2, long long sel) 15{ 16 double tmp = 0.0; 17 18 if ((sel & 0x3) == 0) tmp = src1[0]; 19 if ((sel & 0x3) == 1) tmp = src1[1]; 20 if ((sel & 0x3) == 2) tmp = src2[0]; 21 if ((sel & 0x3) == 3) tmp = src2[1]; 22 23 return tmp; 24} 25 26static double 27sel_and_condzerodp(double *src1, double *src2, long long sel, int imm8) 28{ 29 double tmp; 30 31 tmp = select2dp(src1, src2, sel & 0x3); 32 33 if (((imm8 & 0x3) == 2) && ((sel & 0x4) == 0x4)) tmp = 0; 34 if (((imm8 & 0x3) == 3) && ((sel & 0x4) == 0x0)) tmp = 0; 35 36 return tmp; 37} 38 39void static 40xop_test () 41{ 42 union128d s1, s2, u; 43 union128i_q s3; 44 double e[2]; 45 46 s1.x = _mm_set_pd (1, 2); 47 s2.x = _mm_set_pd (3, 4); 48 s3.x = _mm_set_epi64x (1, 2); 49 u.x = _mm_permute2_pd(s1.x, s2.x, s3.x, ZERO_MATCH); 50 51 e[0] = sel_and_condzerodp (s1.a, s2.a, (s3.a[0] & 0xe)>>1, ZERO_MATCH); 52 e[1] = sel_and_condzerodp (s1.a, s2.a, (s3.a[1] & 0xe)>>1, ZERO_MATCH); 53 54 if (check_union128d (u, e)) 55 abort (); 56} 57 58