Subversion Repositories openrisc

/* { dg-require-effective-target vect_int } */
 
#include <stdarg.h>
#include "tree-vect.h"
 
#define A 3
#define N 16
 
short src[N], dst[N];
 
void foo (int a)
{
  dst[0] += a*src[0];
  dst[1] += a*src[1];
  dst[2] += a*src[2];
  dst[3] += a*src[3];
  dst[4] += a*src[4];
  dst[5] += a*src[5];
  dst[6] += a*src[6];
  dst[7] += a*src[7];
}
 
 
int main (void)
{
  int i;
 
  check_vect ();
 
  for (i = 0; i < N; i++)
    {
      dst[i] = 0;
      src[i] = i;
    }
 
  foo (A);
 
  for (i = 0; i < 8; i++)
    {
      if (dst[i] != A * i)
        abort ();
    }
 
  return 0;
}
 
/* { dg-final { scan-tree-dump-times "basic block vectorized using SLP" 1 "slp" { target { vect_int_mult && { vect_unpack && vect_pack_trunc } } } } } */
/* { dg-final { cleanup-tree-dump "slp" } } */