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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [pr27335.c] - Blame information for rev 801

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


/* { dg-do compile } */
/* { dg-options "-O2 -funroll-loops" } */
 
extern void bar () __attribute__ ((noreturn));
 
inline double
baz (double *x, unsigned int y)
{
  if (y >= 6)
    bar ();
  return x[y];
}
 
double *a, *b;
 
void
foo ()
{
  unsigned int r, s, t;
 
  for (r = 0; r < 2; r++)
    for (t = 0; t < 2; t++)
      {
        for (s = 0; s < 3; s++)
          b[r * 2 + t] += baz (a, 3 * s + t);
      }
}

Line No.	Rev	Author	Line
1	689	jeremybenn	`/* { dg-do compile } */`
2			`/* { dg-options "-O2 -funroll-loops" } */`
3
4			`extern void bar () __attribute__ ((noreturn));`
5
6			`inline double`
7			`baz (double *x, unsigned int y)`
8			`{`
9			`if (y >= 6)`
10			`bar ();`
11			`return x[y];`
12			`}`
13
14			`double a, b;`
15
16			`void`
17			`foo ()`
18			`{`
19			`unsigned int r, s, t;`
20
21			`for (r = 0; r < 2; r++)`
22			`for (t = 0; t < 2; t++)`
23			`{`
24			`for (s = 0; s < 3; s++)`
25			`b[r * 2 + t] += baz (a, 3 * s + t);`
26			`}`
27			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [pr27335.c] - Blame information for rev 801