gcc/testsuite/gcc.target/i386/sse3-movshdup.c

   1 /* { dg-do run { target i?86-*-* x86_64-*-* } } */
   2 /* { dg-options "-O2 -msse3" } */
   3 #include <pmmintrin.h>
   4 #include <stdlib.h>
   5 #include "../../gcc.dg/i386-cpuid.h"
   6
   7 static void sse3_test (void);
   8
   9 int
  10 main ()
  11 {
  12   unsigned long cpu_facilities;
  13
  14   cpu_facilities = i386_cpuid_ecx ();
  15
  16   /* Run SSE3 test only if host has SSE3 support.  */
  17   if ((cpu_facilities & bit_SSE3))
  18     sse3_test ();
  19
  20   exit (0);
  21 }
  22
  23 static void
  24 sse3_test_movshdup_reg (float *i1, float *r)
  25 {
  26   __m128 t1 = _mm_loadu_ps (i1);
  27   __m128 t2 = _mm_movehdup_ps (t1);
  28
  29   _mm_storeu_ps (r, t2);
  30 }
  31
  32 static void
  33 sse3_test_movshdup_reg_subsume (float *i1, float *r)
  34 {
  35   __m128 t1 = _mm_load_ps (i1);
  36   __m128 t2 = _mm_movehdup_ps (t1);
  37
  38   _mm_storeu_ps (r, t2);
  39 }
  40
  41 static int
  42 chk_ps (float *v1, float *v2)
  43 {
  44   int i;
  45   int n_fails = 0;
  46
  47   for (i = 0; i < 4; i++)
  48     if (v1[i] != v2[i])
  49       n_fails += 1;
  50
  51   return n_fails;
  52 }
  53
  54 static float p1[4] __attribute__ ((aligned(16)));
  55 static float p2[4];
  56 static float ck[4];
  57
  58 static float vals[80] =
  59   {
  60     100.0,  200.0, 300.0, 400.0, 5.0, -1.0, .345, -21.5,
  61     1100.0, 0.235, 321.3, 53.40, 0.3, 10.0, 42.0, 32.52,
  62     32.6,   123.3, 1.234, 2.156, 0.1, 3.25, 4.75, 32.44,
  63     12.16,  52.34, 64.12, 71.13, -.1, 2.30, 5.12, 3.785,
  64     541.3,  321.4, 231.4, 531.4, 71., 321., 231., -531.,
  65     23.45,  23.45, 23.45, 23.45, 23.45, 23.45, 23.45, 23.45,
  66     23.45,  -1.43, -6.74, 6.345, -20.1, -20.1, -40.1, -40.1,
  67     1.234,  2.345, 3.456, 4.567, 5.678, 6.789, 7.891, 8.912,
  68     -9.32,  -8.41, -7.50, -6.59, -5.68, -4.77, -3.86, -2.95,
  69     9.32,  8.41, 7.50, 6.59, -5.68, -4.77, -3.86, -2.95
  70   };
  71
  72 static void
  73 sse3_test (void)
  74 {
  75   int i;
  76   int fail = 0;
  77
  78   for (i = 0; i < 80; i += 2)
  79     {
  80       p1[0] = 0.0;
  81       p1[1] = vals[i+0];
  82       p1[2] = 1.0;
  83       p1[3] = vals[i+1];
  84
  85       ck[0] = p1[1];
  86       ck[1] = p1[1];
  87       ck[2] = p1[3];
  88       ck[3] = p1[3];
  89
  90       sse3_test_movshdup_reg (p1, p2);
  91
  92       fail += chk_ps (ck, p2);
  93
  94       sse3_test_movshdup_reg_subsume (p1, p2);
  95
  96       fail += chk_ps (ck, p2);
  97     }
  98
  99   if (fail != 0)
 100     abort ();
 101 }