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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [20010116-1.c] - Blame information for rev 715

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


/* Distilled from optimization/863.  */
 
extern void abort (void);
extern void exit (int);
extern void ok (int);
 
typedef struct
{
  int x, y, z;
} Data;
 
void find (Data *first, Data *last)
{
  int i;
  for (i = (last - first) >> 2; i > 0; --i)
    ok(i);
  abort ();
}
 
void ok(int i)
{
  if (i != 1)
    abort ();
  exit (0);
}
 
int
main ()
{
  Data DataList[4];
  find (DataList + 0, DataList + 4);
}

Line No.	Rev	Author	Line
1	688	jeremybenn	`/* Distilled from optimization/863. */`
2
3			`extern void abort (void);`
4			`extern void exit (int);`
5			`extern void ok (int);`
6
7			`typedef struct`
8			`{`
9			`int x, y, z;`
10			`} Data;`
11
12			`void find (Data first, Data last)`
13			`{`
14			`int i;`
15			`for (i = (last - first) >> 2; i > 0; --i)`
16			`ok(i);`
17			`abort ();`
18			`}`
19
20			`void ok(int i)`
21			`{`
22			`if (i != 1)`
23			`abort ();`
24			`exit (0);`
25			`}`
26
27			`int`
28			`main ()`
29			`{`
30			`Data DataList[4];`
31			`find (DataList + 0, DataList + 4);`
32			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [20010116-1.c] - Blame information for rev 715