gcc/testsuite/gcc.target/powerpc/sse4_1-blendpd.c

   1 /* { dg-do run } */
   2 /* { dg-require-effective-target p8vector_hw } */
   3 /* { dg-options "-O2 -mvsx -Wno-psabi" } */
   4 /* { dg-additional-options "-mdejagnu-cpu=power8" { target { ! has_arch_pwr8 } } } */
   5
   6 #ifndef CHECK_H
   7 #define CHECK_H "sse4_1-check.h"
   8 #endif
   9
  10 #ifndef TEST
  11 #define TEST sse4_1_test
  12 #endif
  13
  14 #include CHECK_H
  15
  16 #include <smmintrin.h>
  17 #include <string.h>
  18
  19 #define NUM 20
  20
  21 #ifndef MASK
  22 #define MASK 0x03
  23 #endif
  24
  25 static void
  26 init_blendpd (double *src1, double *src2)
  27 {
  28   int i, sign = 1;
  29
  30   for (i = 0; i < NUM * 2; i++)
  31     {
  32       src1[i] = i * i * sign;
  33       src2[i] = (i + 20) * sign;
  34       sign = -sign;
  35     }
  36 }
  37
  38 static int
  39 check_blendpd (__m128d *dst, double *src1, double *src2)
  40 {
  41   double tmp[2];
  42   int j;
  43
  44   memcpy (&tmp[0], src1, sizeof (tmp));
  45
  46   for(j = 0; j < 2; j++)
  47     if ((MASK & (1 << j)))
  48       tmp[j] = src2[j];
  49
  50   return memcmp (dst, &tmp[0], sizeof (tmp));
  51 }
  52
  53 static void
  54 TEST (void)
  55 {
  56   __m128d x, y;
  57   union
  58     {
  59       __m128d x[NUM];
  60       double d[NUM * 2];
  61     } dst, src1, src2;
  62   union
  63     {
  64       __m128d x;
  65       double d[2];
  66     } src3;
  67   int i;
  68
  69   init_blendpd (src1.d, src2.d);
  70
  71   /* Check blendpd imm8, m128, xmm */
  72   for (i = 0; i < NUM; i++)
  73     {
  74       dst.x[i] = _mm_blend_pd (src1.x[i], src2.x[i], MASK);
  75       if (check_blendpd (&dst.x[i], &src1.d[i * 2], &src2.d[i * 2]))
  76         abort ();
  77     }
  78
  79   /* Check blendpd imm8, xmm, xmm */
  80   src3.x = _mm_setzero_pd ();
  81
  82   x = _mm_blend_pd (dst.x[2], src3.x, MASK);
  83   y = _mm_blend_pd (src3.x, dst.x[2], MASK);
  84
  85   if (check_blendpd (&x, &dst.d[4], &src3.d[0]))
  86     abort ();
  87
  88   if (check_blendpd (&y, &src3.d[0], &dst.d[4]))
  89     abort ();
  90 }