OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [931013-2.c] - Rev 774

Go to most recent revision | Compare with Previous | Blame | View Log

f (unsigned short Z[48])
{
  int j;
  unsigned short t1, t2, t3, T[48];
  unsigned short *p = T + 48;
 
  for (j = 1; j < 8; j++)
    {
      t1 = *Z++;
      *--p = *Z++;
      *--p = t1;
      t1 = inv(*Z++);
      t2 = -*Z++;
      t3 = -*Z++;
      *--p = inv(*Z++);
      *--p = t2;
      *--p = t3;
      *--p = t1;
    }
}
 

Go to most recent revision | Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.