Subversion Repositories openrisc

/* { dg-do run } */

/* { dg-options "-ftree-vectorize" } */

float val[256];

float x;

void __attribute__((noinline,noclone))

foo(int len, int beg)

{

  int i;

  for (i = len - 1; i >= beg; --i)

    x += val[i] * 2;

}

void __attribute__((noinline,noclone))

bar(void)

{

  int i;

  for (i = 255; i >= 0; --i)

    x += val[i] * 2;

  for (i = 254; i >= 0; --i)

    x += val[i] * 2;

  for (i = 253; i >= 0; --i)

    x += val[i] * 2;

  for (i = 252; i >= 0; --i)

    x += val[i] * 2;

}

float y[256];

void __attribute__((noinline,noclone))

foobar(void)

{

  int i;

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

    {

      float l = 0;

      l += val[255 - i] * 2;

      l += val[254 - i] * 2;

      l += val[253 - i] * 2;

      l += val[252 - i] * 2;

      y[i] = l;

    }

}

int main()

{

  foo(256-1, 0);

  foo(256-2, 0);

  foo(256-3, 0);

  foo(256-4, 0);

  bar();

  foobar();

  return 0;

}