Subversion Repositories openrisc

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

#include <stdarg.h>

#include "tree-vect.h"

#define N 40

int a[N];

__attribute__ ((noinline)) int

foo (){

  int i,j;

  int sum;

  for (i = 0; i < N; i++) {

    sum = 0;

    for (j = 0; j < N; j++) {

      sum += j;

    }

    a[i] += sum + i;

  }

}

int main (void)

{

  int i,j;

  int sum;

  int aa[N];

  check_vect ();

  for (i=0; i<N; i++){

    a[i] = i;

    aa[i] = i;

  }

  foo ();

    /* check results:  */

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

    {

      sum = 0;

      for (j = 0; j < N; j++)

        sum += j;

      if (a[i] != aa[i] + sum + i)

        abort();

    }

  return 0;

}

/* { dg-final { scan-tree-dump-times "OUTER LOOP VECTORIZED." 1 "vect" } } */

/* { dg-final { cleanup-tree-dump "vect" } } */