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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [931102-2.c] - Blame information for rev 774

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


typedef struct {
  int a;
} VCR;
 
typedef struct {
  VCR vcr[8];
} VCRC;
 
typedef struct {
  char vcr;
} OWN;
 
OWN Own[16];
 
f (x, own)
  VCRC *x;
  OWN *own;
{
  x[own->vcr / 8].vcr[own->vcr % 8].a--;
  x[own->vcr / 8].vcr[own->vcr % 8].a = x[own->vcr / 8].vcr[own->vcr % 8].a;
}

Line No.	Rev	Author	Line
1	688	jeremybenn	`typedef struct {`
2			`int a;`
3			`} VCR;`
4
5			`typedef struct {`
6			`VCR vcr[8];`
7			`} VCRC;`
8
9			`typedef struct {`
10			`char vcr;`
11			`} OWN;`
12
13			`OWN Own[16];`
14
15			`f (x, own)`
16			`VCRC *x;`
17			`OWN *own;`
18			`{`
19			`x[own->vcr / 8].vcr[own->vcr % 8].a--;`
20			`x[own->vcr / 8].vcr[own->vcr % 8].a = x[own->vcr / 8].vcr[own->vcr % 8].a;`
21			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [931102-2.c] - Blame information for rev 774