gcc/testsuite/gcc.target/powerpc/sse-cmpss-1.c

   1 /* { dg-do run } */
   2 /* { dg-options "-O3 -mvsx" } */
   3 /* { dg-additional-options "-mdejagnu-cpu=power8" { target { ! has_arch_pwr8 } } } */
   4 /* { dg-require-effective-target p8vector_hw } */
   5
   6 #define NO_WARN_X86_INTRINSICS 1
   7
   8 #ifndef CHECK_H
   9 #define CHECK_H "sse-check.h"
  10 #endif
  11
  12 #include CHECK_H
  13
  14 #ifndef TEST
  15 #define TEST sse_test_cmpss_1
  16 #endif
  17
  18 #include <math.h>
  19
  20 static float s1[]={2134.3343, 6678.346, 453.345635, 54646.464356};
  21 static float s2[]={41124.234, 6678.346, 8653.65635, 856.43576};
  22 static int dd[] = {1, 2, 3, 4};
  23 static float d[4];
  24 static union{int i[4]; float f[4];} e;
  25
  26 void sse_cmp_check(char *id)
  27 {
  28   int *pd = (int*)&d;
  29     if(checkVi((int*)d, e.i, 4)){
  30         printf("mm_cmp%s_ss FAILED\n", id);
  31         printf("\td %f %s %f]\n",
  32                s1[0] , id, s2[1]);
  33         printf("\td [%x,%x,%x,%x]\n",
  34                pd[0], pd[1], pd[2], pd[3]);
  35         printf("\te [%x,%x,%x,%x]\n",
  36                e.i[0], e.i[1], e.i[2], e.i[3]);
  37     }
  38 }
  39
  40 static void
  41 TEST ()
  42 {
  43     __m128 source1, source2, dest;
  44     int i;
  45
  46 #define CMP(cmp, rel)                                   \
  47     e.i[0] = rel ? -1 : 0;                              \
  48     dest = _mm_loadu_ps((float*)dd);                    \
  49     source1 = _mm_loadu_ps(s1);                         \
  50     source2 = _mm_loadu_ps(s2);                         \
  51     dest = _mm_cmp##cmp##_ss(source1, source2);         \
  52     _mm_storeu_ps(d, dest);                             \
  53     sse_cmp_check("" #cmp "");
  54
  55     for(i = 1; i < 4; i++) e.f[i] = s1[i];
  56
  57     CMP(eq, !isunordered(s1[0], s2[0]) && s1[0] == s2[0]);
  58     CMP(lt, !isunordered(s1[0], s2[0]) && s1[0] < s2[0]);
  59     CMP(le, !isunordered(s1[0], s2[0]) && s1[0] <= s2[0]);
  60     CMP(unord, isunordered(s1[0], s2[0]));
  61     CMP(neq, isunordered(s1[0], s2[0]) || s1[0] != s2[0]);
  62     CMP(nlt, isunordered(s1[0], s2[0]) || s1[0] >= s2[0]);
  63     CMP(nle, isunordered(s1[0], s2[0]) || s1[0] > s2[0]);
  64     CMP(ord, !isunordered(s1[0], s2[0]));
  65
  66     CMP(ge, isunordered(s1[0], s2[0]) || s1[0] >= s2[0]);
  67     CMP(gt, isunordered(s1[0], s2[0]) || s1[0] > s2[0]);
  68     CMP(nge, !isunordered(s1[0], s2[0]) && s1[0] < s2[0]);
  69     CMP(ngt, !isunordered(s1[0], s2[0]) && s1[0] <= s2[0]);
  70 }