gcc/testsuite/gcc.dg/graphite/id-23.c

   1 void SubMtx_blockDiagonalInfo (int **);
   2 double *ZV_entries (void);
   3 void SubMtx_fillRowZV (int irow)
   4 {
   5   double *rowvec = ZV_entries ();
   6   double *entries;
   7   int ii, ipivot, jrow, kk, m;
   8   int *pivotsizes;
   9
  10   SubMtx_blockDiagonalInfo (&pivotsizes);
  11
  12   for (jrow = ipivot = kk = 0; jrow <= irow; ipivot++)
  13     {
  14       m = pivotsizes[ipivot];
  15       if (jrow <= irow && irow < jrow + m)
  16         for (ii = jrow; ii < irow; ii++)
  17           {
  18             rowvec[2*ii] = entries[2*kk];
  19             rowvec[2*ii+1] = entries[2*kk+1];
  20           }
  21       jrow += m;
  22     }
  23 }