Subversion Repositories openrisc

/* PR target/49411 */

/* { dg-do run } */

/* { dg-require-effective-target xop } */

/* { dg-options "-O2 -mxop" } */

#include "xop-check.h"

#include <x86intrin.h>

extern void abort (void);

union

{

  __m128i v;

  unsigned char c[16];

  unsigned short s[8];

  unsigned int i[4];

  unsigned long long l[2];

} a, b, c, d;

#define TEST1(F, N, S, SS) \

do {                                                    \

  for (i = 0; i < sizeof (a.F) / sizeof (a.F[0]); i++)    \

    a.F[i] = i * 17;                                    \

  s = _mm_set1_epi##SS (N);                             \

  b.v = _mm_roti_epi##S (a.v, N);                       \

  c.v = _mm_rot_epi##S (a.v, s);                        \

  for (i = 0; i < sizeof (a.F) / sizeof (a.F[0]); i++)    \

    {                                                   \

      int mask = __CHAR_BIT__ * sizeof (a.F[i]) - 1;    \

      d.F[i] = a.F[i] << (N & mask);                    \

      if (N & mask)                                     \

        d.F[i] |= a.F[i] >> (mask + 1 - (N & mask));    \

      if (b.F[i] != c.F[i] || b.F[i] != d.F[i])         \

        abort ();                                       \

    }                                                   \

} while (0)

#define TEST(N) \

  TEST1 (c, N, 8, 8);                                   \

  TEST1 (s, N, 16, 16);                                 \

  TEST1 (i, N, 32, 32);                                 \

  TEST1 (l, N, 64, 64x)

volatile int n;

static void

xop_test (void)

{

  unsigned int i;

  __m128i s;

#ifndef NON_CONST

  TEST (5);

  TEST (-5);

  TEST (0);

  TEST (31);

#else

  n = 5; TEST (n);

  n = -5; TEST (n);

  n = 0; TEST (n);

  n = 31; TEST (n);

#endif

}