(root)/
gcc-13.2.0/
gcc/
testsuite/
gcc.target/
i386/
sse2-mmx-punpcklbw.c
       1  /* { dg-do run } */
       2  /* { dg-options "-O2 -fno-strict-aliasing -msse2" } */
       3  /* { dg-additional-options "-mno-mmx" { target { ! ia32 } } } */
       4  
       5  #include "sse2-check.h"
       6  #include "mmx-vals.h"
       7  
       8  __attribute__((noinline, noclone))
       9  static void
      10  test_punpcklbw  (long long *ll1, long long *ll2, long long *r)
      11  {
      12    __m64 t1 = *(__m64 *) ll1;
      13    __m64 t2 = *(__m64 *) ll2;
      14    *(__m64 *) r = _m_punpcklbw (t1, t2);
      15  }
      16  
      17  /* Routine to manually compute the results */
      18  static void
      19  compute_correct_result (long long *dst_p, long long *src_p,
      20  			long long *res_p)
      21  {
      22    char *dst = (char *) dst_p;
      23    char *src = (char *) src_p;
      24    char *res = (char *) res_p;
      25    res[0] = dst[0];
      26    res[1] = src[0];
      27    res[2] = dst[1];
      28    res[3] = src[1];
      29    res[4] = dst[2];
      30    res[5] = src[2];
      31    res[6] = dst[3];
      32    res[7] = src[3];
      33  }
      34  
      35  static void
      36  sse2_test (void)
      37  {
      38    int i;
      39    long long r, ck;
      40    int fail = 0;
      41  
      42    /* Run the MMX tests */
      43    for (i = 0; i < MMX_num_ops; i += 2)
      44      {
      45        test_punpcklbw (&MMXops[i], &MMXops[i + 1], &r);
      46        compute_correct_result (&MMXops[i], &MMXops[i + 1], &ck);
      47        if (ck != r)
      48  	fail++;
      49      }
      50  
      51    if (fail != 0)
      52      abort ();
      53  }