Subversion Repositories openrisc

/* { dg-do run } */

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

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

#include "avx2-check.h"

static char

short_to_byte (short iVal)

{

  char sVal;

  if (iVal < -128)

    sVal = -128;

  else if (iVal > 127)

    sVal = 127;

  else

    sVal = iVal;

  return sVal;

}

void static

avx2_test (void)

{

  union256i_w s1, s2;

  union256i_b u;

  char e[32];

  int i;

  s1.x = _mm256_set_epi16 (1, 2, 3, 4, 6500, 20, 30, 90,

                           88, 44, 33, 22, 11, 98, 78, -1000);

  s2.x = _mm256_set_epi16 (88, 44, 33, 22, 11, 98, 76, -650,

                           1, 2, 3, 4, 6500, 20, 30, 90);

  u.x = _mm256_packs_epi16 (s1.x, s2.x);

  for (i = 0; i < 8; i++)

    {

      e[i] = short_to_byte (s1.a[i]);

      e[i + 8] = short_to_byte (s2.a[i]);

      e[i + 16] = short_to_byte (s1.a[i + 8]);

      e[i + 24] = short_to_byte (s2.a[i + 8]);

    }

  if (check_union256i_b (u, e))

    abort ();

}