gcc/testsuite/gcc.target/i386/ssse3-phaddw.c

   1 /* { dg-do run } */
   2 /* { dg-require-effective-target ssse3 } */
   3 /* { dg-options "-O2 -mssse3" } */
   4
   5 #include "ssse3-check.h"
   6 #include "ssse3-vals.h"
   7
   8 #include <tmmintrin.h>
   9
  10 /* Test the 64-bit form */
  11 static void
  12 ssse3_test_phaddw (int *i1, int *i2, int *r)
  13 {
  14   __m64 t1 = *(__m64 *) i1;
  15   __m64 t2 = *(__m64 *) i2;
  16   *(__m64 *) r = _mm_hadd_pi16 (t1, t2);
  17   _mm_empty ();
  18 }
  19
  20 /* Test the 128-bit form */
  21 static void
  22 ssse3_test_phaddw128 (int *i1, int *i2, int *r)
  23 {
  24   /* Assumes incoming pointers are 16-byte aligned */
  25   __m128i t1 = *(__m128i *) i1;
  26   __m128i t2 = *(__m128i *) i2;
  27   *(__m128i *) r = _mm_hadd_epi16 (t1, t2);
  28 }
  29
  30 /* Routine to manually compute the results */
  31 static void
  32 compute_correct_result(int *i1, int *i2, int *r)
  33 {
  34   short *s1 = (short *) i1;
  35   short *s2 = (short *) i2;
  36   short *sout = (short *) r;
  37   int i;
  38
  39   for (i = 0; i < 4; i++)
  40     sout[i] = s1[2 * i] + s1[2 * i + 1];
  41
  42   for (i = 0; i < 4; i++)
  43     sout[i + 4] = s2[2 * i] + s2[2 * i + 1];
  44 }
  45
  46 static void
  47 ssse3_test (void)
  48 {
  49   int i;
  50   int r [4] __attribute__ ((aligned(16)));
  51   int ck [4];
  52   int fail = 0;
  53
  54   for (i = 0; i < 256; i += 8)
  55     {
  56       /* Manually compute the result */
  57       compute_correct_result (&vals[i + 0], &vals[i + 4], ck);
  58
  59       /* Run the 64-bit tests */
  60       ssse3_test_phaddw (&vals[i + 0], &vals[i + 2], &r[0]);
  61       ssse3_test_phaddw (&vals[i + 4], &vals[i + 6], &r[2]);
  62       fail += chk_128 (ck, r);
  63
  64       /* Run the 128-bit tests */
  65       ssse3_test_phaddw128 (&vals[i + 0], &vals[i + 4], r);
  66       fail += chk_128 (ck, r);
  67     }
  68
  69   if (fail != 0)
  70     abort ();
  71 }