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] - Blame information for rev 774

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

Line No. Rev Author Line
1 688 jeremybenn
f (unsigned short Z[48])
2
{
3
  int j;
4
  unsigned short t1, t2, t3, T[48];
5
  unsigned short *p = T + 48;
6
 
7
  for (j = 1; j < 8; j++)
8
    {
9
      t1 = *Z++;
10
      *--p = *Z++;
11
      *--p = t1;
12
      t1 = inv(*Z++);
13
      t2 = -*Z++;
14
      t3 = -*Z++;
15
      *--p = inv(*Z++);
16
      *--p = t2;
17
      *--p = t3;
18
      *--p = t1;
19
    }
20
}

powered by: WebSVN 2.1.0

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