OpenCores
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/] [graphite/] [scop-1.c] - Blame information for rev 298

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 298 jeremybenn
void bar (void);
2
 
3
int toto()
4
{
5
  int i, j, k;
6
  int a[100][100];
7
  int b[100];
8
 
9
  for (i = 1; i < 100; i++)
10
    {
11
      for (j = 1; j < 100; j++)
12
        a[j][i] = a[j+1][i-1] + 2;
13
 
14
      b[i] = b[i-1] + 2;
15
 
16
      bar ();
17
 
18
      for (j = 1; j < 100; j++)
19
        a[j][i] = a[j+1][i-1] + 2;
20
 
21
      b[i] = a[i-1][i] + 2;
22
 
23
      for (j = 1; j < 100; j++)
24
        a[j][i] = a[j+1][i-1] + 2;
25
    }
26
 
27
  return a[3][5] + b[1];
28
}
29
 
30
/* { dg-final { scan-tree-dump-times "number of SCoPs: 3" 1 "graphite"} } */
31
/* { dg-final { cleanup-tree-dump "graphite" } } */

powered by: WebSVN 2.1.0

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