OSDN Git Service

Propagate constant values or parametric expressions outside the scop region.
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gcc.dg / graphite / id-23.c
1 double *ZV_entries (void);
2 void SubMtx_fillRowZV (int irow)
3 {
4   double *rowvec = ZV_entries ();
5   double *entries;
6   int ii, ipivot, jrow, kk, m;
7   int *pivotsizes;
8
9   SubMtx_blockDiagonalInfo (&pivotsizes);
10
11   for (jrow = ipivot = kk = 0; jrow <= irow; ipivot++)
12     {
13       m = pivotsizes[ipivot];
14       if (jrow <= irow && irow < jrow + m)
15         for (ii = jrow; ii < irow; ii++)
16           {
17             rowvec[2*ii] = entries[2*kk];
18             rowvec[2*ii+1] = entries[2*kk+1];
19           }
20       jrow += m;
21     }
22 }