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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [vect/] [O1-pr41008.c] - Blame information for rev 298

Details | Compare with Previous | View Log


/* { dg-do compile } */
 
double heating[2][2];
 
void foo (int, int);
 
void map_do()
{
  int jsav, ksav, k, j;
 
  for(k = 0; k < 2; k++)
    for(j = 0; j < 2; j++)
      if (heating[k][j] > 0.)
        {
          jsav = j;
          ksav = k;
        }
 
  foo (jsav, ksav);
}
 
/* { dg-final { cleanup-tree-dump "vect" } } */
 

Line No.	Rev	Author	Line
1	298	jeremybenn	`/* { dg-do compile } */`
2
3			`double heating[2][2];`
4
5			`void foo (int, int);`
6
7			`void map_do()`
8			`{`
9			`int jsav, ksav, k, j;`
10
11			`for(k = 0; k < 2; k++)`
12			`for(j = 0; j < 2; j++)`
13			`if (heating[k][j] > 0.)`
14			`{`
15			`jsav = j;`
16			`ksav = k;`
17			`}`
18
19			`foo (jsav, ksav);`
20			`}`
21
22			`/* { dg-final { cleanup-tree-dump "vect" } } */`
23

Browse

Tools

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [vect/] [O1-pr41008.c] - Blame information for rev 298